- Back to Home »
- Pascal »
- Perhitungan Volume Kubus/Balok Dengan Pascal
Posted by : Zan Haqqi
Jumat, 03 Januari 2014
Hello sobat CoJa, back again with me... :)
Kali ini saya akan share bagaimana cara membuat program perhitungan volume kubus ataupun volume balok dengan bahasa pemrograman pascal. Kembali saya ingatkan ini adalah lanjutan dari postingan saya yang berjudul Pascal Penjumlahan 3 Bilangan.
Tools:
- Turbo Pascal
- DOSBox ( Untuk menjalankan Turbo Pascal pada komputer 64bit ).
Naah dalam hal ini kita harus tau dahulu rumus mencari volume sebuah kubus ataupun balok.
Apabila tidak mengerti, maka akan saya ingatkan kembali ke bangku SMP. Rumusnya adalah:
Panjang Kubus/Balok x Lebar Kubus/Balok x Tinggi Kubus/Balok
atau biasa ditulis: P x L x T
Ok, saya anggap anda sudah mengingatnya. Sekarang kita harus membuat codingan pascalnya didalam Turbo Pascal.
Tulis/ketik :
===========================
program Penjumlahan;
{I.S : diberikan layar kosong}
{F.S : Menampilkan volume balok atau kubus}
Uses crt;
var
panjang,lebar,tinggi,hasil:integer;
begin
clrscr;
writeln('Mencari Volume Kubus Ataupun Balok');
write('Masukkan Ukuran Panjang: ');readln(panjang);
write('Masukkan Ukuran Lebar: ');readln(lebar);
write('Masukkan Ukuran Tinggi: ');readln(tinggi);
hasil:=panjang*lebar*tinggi;
writeln('Maka Volumenya adalah: ',hasil);readln;
end.
===========================Nah, dengan begini anda tinggal me-run/compile agar menjadi .exe program. :)
Ok, cukup sekian saja dari saya. Semoga bermanfaat.
Salam :)

