Yoooo guys!
Aku akan memberikan program untuk menghitung selisih 2 waktu. Asumsikan program ini menggunakan sistem 24jam. Tampilan yang diminta adalah jam:menit:detik. Yuk, simak bareng-bareng!
Contoh kasus :
Selisih waktu antara 15.45 sampai 22.23
Analisis :
Selisih jam = 22 - 15 = 7
Selisih menit = (60-45) + 23 = 38 menit
Selisih detik = 00 - 00 = 00 detik
Maka selisih kedua waktu tersebut adalah 7 jam 38 menit 00 detik (7:38:00)
Algoritma Hitung_Jam
{Menghitung selisih 2 waktu dengan sistem 24jam dan ditampilkan dalam bentuk jam:menit:detik}
Deklarasi :
jam1, jam2, menit1, menit2, detik1, detik2 : integer
selisihjam, selisihmenit, selisihdetik : real
Deskripsi :
read (jam1, jam2, menit1, menit2, detik1, detik2)
if(jam2<=jam1) then jam1 <- 24-jam1
selisihjam <- jam1+jam2
else selisihjam <- jam2-jam1
end if
if(menit1==0 and menit2==0) the selisihmenit <- 00
else menit1 <- 60-menit1
selisihmenit <- menit1+menit2
end if
if(detik1==0 and detik2==0) then selisihdetik <- 00
else detik1 <- 60-detik1
selisihdetik <- detik1+detik2
end if
write (selisihjam, selisihmenit, selisihdetik)
Komentar
Posting Komentar