THE LITTLEST ANGEL

Latihan Menganalisa Program {Tuesday, September 21, 2010 , 6:44 AM}

Tuliskan perintah berikut ini pada turbo pascal anda!
1. PROGRAM  waktu;
Uses Crt;
Const
JamPerHari =24;
HariPerMinggu =7;
BulanPertahun =12;
HariPerTahun  =365;
Begin
Clrscr   {Clear Screen};
Writeln (‘Jumlah Jam Per Hari =’,JamPerHari:3);
Writeln (‘Jumlah Hari Per Minggu =’,HariPerMinggu:3);
Writeln (‘Jumlah Bulan Per Tahun =’,BulanPerTahun:3);
Writeln (‘Jumlah Hari Per Tahun =’,HariPerTahun:4);
Readln
End.

Result:
Jumlah jam Per Hari = 24
Jumlah Hari Per Minggu = 7
Jumlah Bulan per Tahun = 12
Jumlah Hari Per Tahun = 365

3.  Program 1 di hilangkan perintah uses Crt
Result :
Error 3 : Unknown identifier
itu karena uses crt berkaitan dengan Clrscr.Sehingga jika salah satu tidak ada,maka tidak ada hasil apapun.

4. Dari program 1 tersebut ubah angka 3 menjadi 1 dan angka 4 menjadi 2 pada baris 10 sampai dengan 13.
Result :
Jumlah Jam Per Hari =24
Jumlah Hari Per Minggu =7
Jumlah Bulan Per Tahun =12
Jumlah Hari Per Tahun =365

Labels:




layout Developed by viaclarajessica