My world

PROGRAM BUNYI  PROGRAM TAMPIL_ASCIL; USES CRT; VAR HURUF:CHAR;     i:INTEGER; BEGIN      CLRSCR;      FOR i:=1 TO 10 DO      BEGIN        WRITE('Tulis sebuah huruf : ');        HURUF:=readkey;        WRITELN('Kok hurufnya tidak muncul?');        SOUND(300); DELAY(1000); NOSOUND;        SOUND(600); DELAY(1500); NOSOUND;        WRITELN;        WRITELN('Huruf yang anda masukkan adalah huruf ',HURUF);        WRITELN('No ASCII dari huruf di atas adalah ', ord(HURUF));      END;      READLN; END.

Program Gaji Source Code pada Turbo Pascal   PROGRAM GAJI; USES CRT; VAR gol:integer;     g_pokok,TJ,g_total :real; BEGIN      CLRSCR;      TEXTCOLOR(LIGHTGREEN+BLINK);WRITELN('Program Menghitung Gaji');      TEXTCOLOR(WHITE);WRITELN('-----------------------');      WRITE('Berapa golongan anda?  ');READLN(gol);      CASE gol OF           1: begin {golongan 1}              g_pokok:=100000;              TJ:=0.05*g_pokok;              g_total:=g_pokok+TJ;              end;           2: begin {golonga...

DERET FIBONACCI Membuat sebuah larik dengan kapasitas 100 ruang data yang bertipe data integer. Isilah nilai larik pada index ke-1 dan index ke-2 dengan bilangan 1. Larik ini akan mengisi index ke-3 dan seterusnya berdasarkan penjumlahan pada dua buah bilangan sebelumnya, sehingga menjadi sebuah deret yang dinamakan dengan deret Fibonacci. Kemudian menampilkan deret tersebut. Berikut Source Code menggunakan Turbo Pascal. Program Fibonaci; uses crt; type larik = array [1..100] of integer; var deret : larik;     n, a : integer; begin      clrscr;      write('Masukkan jumlah deret : '); readln(n);      writeln;      for a:=0 to n-1 do      begin           if (a=0) or (a=1) then              begin       ...

Tiga Metode Penyelesaian Matriks dan Motode Invers Untuk menyelesaian system persamaan linear dapat digunakan tiga cara, yaitu aturan Cramer,  eliminasi Gauss, dan metode eliminasi Gauss-Jordan beserta m etode Invers Matriks. Penggunaan aturan Cramer Contoh: Tentukan nilai i 1 , i 2 dan i 3 dari persamaan berikut ini.   i 1 +  i 2  +  i 3  =  0                     .................       (I) 2 i 1 +5 i 2 +3 i 3 =  1                    .................       (II) - i 1 +2 i 2 +   i 3  =  2                    .................       ...

REKURSI Rekursi adalah suatu proses berupa pemanggilan dirinya sendiri berupa statement perulangan. Proses rekursif juga memungkinkan terjadinya komputasi yang tidak bekesudahan sampai memori yang digunakan tidak dapat menampung lagi, sehingga perlu diperhatikan akan akan adanya kondisi untuk menghentiksn proses eksekusi program. Sebagai contoh sederhana dari proses rekursif yaitu proses menghitung nilai faktorial dari bilangan bulat positif, dan mencari deret fibonacci dari suatu bilangan bulat, dan sebagainya. Contoh Permasalahan : Menghitung nilai faktorial. 1.       Mendefinisikan Masalah Bagaimana cara menghitung nilai faktorial. Dalam matematika, faktorial dari bilangan asli n adalah hasil perkalian antara bilangan bulat positif yang kurang dari atau sama dengan n. Faktorial ditulis sebagai n! Dan disebut n faktorial.secara umum dapat dituliskan dengan rumus n! = n . (n-1) . (n-2) . (n-3) . ...  Untuk menghitung nilai faktori...

👟🎓 Mahasiswa, Bukan Lagi Anak SMA … Dunia mahasiswa tidak sama dengan dunia SMA. Kebebasan dalam atmosfer mahasiswa lebih besar dan lebih kuat daripada kebebasan yang ada di masa SMA. Bebas bukan saja dalam hal seragam atau upacara, tetapi lebih daripada itu bebas menentukan prioritas dan jadwal kegiatan sehari-hari untuk dirinya. Salah satu tanda bahwa seseorang mahasiswa mulai menapaki jalan hidupnya yang ‘baru’ adalah ketika dia memilih dengan orang seperti apa dia berteman dan mengambil nasihat dan arahan. Bisa jadi seorang pemuda yang di kala SMA rajin ikut kegiatan rohis kemudian berubah drastis setelah mencium aroma kebebasan yang ada di atmosfer perkuliahan. Shalat berjamaah di masjid pun mulai dia tinggalkan. Menghadiri pengajian pun seolah menjadi beban dan momok dalam aktifitas keseharian. Al-Qur’an pun ditinggalkan, tidak dibaca atau direnungkan. Di sisi lain, ada juga anak-anak muda yang kembali menemukan taman-taman surga di majelis ilmu agama. Mereka me...