PROGRAM PASCAL KONVERSI WAKTU

Program ini menggunakan bahasa pemograman pascal dengan menggunakan operator mod dan div.
operator mod untuk menghitung nilai sisa hasil bagi dan operator div untuk pembagian. yang diinput yaitu suatu bilangan kemudian dikonversikan kedalam jam,menitdan detik.
Berikut gambar program dan coding program konversi waktunya

program konversi_waktu;

uses crt;

var bil,jam,menit,detik,tmp:integer;

begin

clrscr;

write ('masukkan bilangan:'); read (bil);

jam:=bil div 3600;

tmp:=bil mod 3600;

menit:=tmp div 60;

tmp:=tmp mod 60;

detik:=tmp;

write ('jam  =');writeln (jam);

write ('menit=');writeln (menit);

write ('detik=');writeln (detik);

readkey;

end.