Program Konversi_Waktu;
Uses Wincrt;
Var j,m,d,h:integer;
begin
Writeln('Program Konversi Waktu');
Writeln('======================');
Writeln;
Write('Masukkan Jumlah Jam : ');readln(j);
Write('Masukkan Jumlah Menit : ');readln(m);
Write('Masukkan Jumlah Detik : ');readln(d);
Writeln;
h:=(j*3600)+(m*60)+d;
Writeln('Jadi Hasil Konversi : ',h,' Detik');
end.
Rabu, 16 Juni 2010
Program Konversi Waktu
Langganan:
Posting Komentar (Atom)
search
Entri Populer
-
Program Urut_Bilangan; Uses Wincrt; Var A,B,C:integer; Begin Writeln('Program Mengurut Bilangan'); Writeln('====================...
Labels
- Algoritma (7)
- Mysql Data Base (1)
- Sistem Operasi (1)
- Tips dan Trik Computer (7)
- Tutorial (3)
About Me
- jodhypati
- Ilmu Komputer adalah ilmu yang sedang saya cari saat ini... jadi minat saya adalah mencari ilmu komputer setinggi mungkin
Tidak ada komentar:
Posting Komentar