Contoh Program Konversi Bilangan dalam detik ke satuan jam, menit, dan detik

Jika kita mau mengkonversi sebuah bilangan dalam satuan detik  menjadi satuan jam, maka kita perlu tahun konversi satuan  antara ja, menit, dan detik. Konversi satuan adalah sebagai berikut :

1 menit = 60 detik
1 jam     = 60 menit
1 jam    = 3600 detik

Misalnya  :

3615 detik  sama dengan 1 jam, 0 menit, 15 detik
127 detik sama dengan 0 jam, 2 menit, 7 detik

1.      Hitung Jam
Cara mendapatkan satuan jam adalah dengan mengambil bilangan bulat dari pembagian  satuan detik dengan 3600
 J = 3615/3600 = 1 sisa 15, maka ambil 1 sebagai satuan jam
2.      Hitung Menit
Hitung satuan menit dimulai dengan cara mengambil bilangan bulat dari sisa pembagian  satuan detik dengan 3600. Misalkan sisa bilanga tersebut kita sebut sebagai s.  Sisa bilangan tersebut tersebut terdiri dari menit dan detik. Ambil satuan menit dengan cara mengambil bilangan bulat dari pembagian  s dengan 60.
J = 3615/3600 = 1 sisa 15, maka ambil 15 sebagai sisa pembagian. Jadi  s = 15
M= 15/60 = 0 sisa 15. Ambil 0 sebagai satuan menit
3.      Hitung Detik
Satuan detik dihitung dengan cara mengambil sisa pembagian dari s dengan 60.
D = 15/60 = 0 sisa 15. Ambil 15 sebagai satuan detik

Maka  3615 detik =  1 jam, 0 menit, 15 detik 

Dalam program Pascal, perintah untuk membagi bilangan dengan mengambil bilangan bulat dan sisanya adalah :

Div = pembagian dengan mengambil bilangan bulat hasil pembagian
Mod = pembagian dengan mengambil sisa  hasil pembagian

Algoritama :

 Mulai
  1.  Definikan variabel j, m, d, s sebagai bilangan bulat (integer)
  2.  Input bilangan d ( detik)
  3. HItung jam, menit, dan detik
  4. Cetak  hasil
  5. Selesai

 Flowchart



Program

uses crt;
var d,m,j,s: integer;

Begin
clrscr;
write(' Input detik = ');
readln(d);

j:= d div 3600;
s:= d mod 3600;
m:= s div 60;
d:= s mod 60;

write(' Jam : ',j,':',m,':',d);
readln;
end.

Hasil  Program


Dengan menginput beberapa kali data, maka hasil keluaran program seperti pada gambar di bawah ini.


Demikian pembahasan tentang konversi satuan detik menjadi satuan jam. Semoga bermanfaat.

Salam sukses

Tidak ada komentar:

Posting Komentar

Silakan memberikan komentar dan pertanyaan yang sifatnya positif.