Menghitung Volume Balok Pada Pascal

Berikut Cara Menghitung Volume Balok Pada Pascal :

uses crt;

var p,l,t,h:integer;

begin

writeln(‘Menghitung Volume Balok’);

write('Masukan Panjang: ');readln(p);

write('Masukan Lebar: ');readln(l);

write('Masukan Tinggi: ');readln(t);

h:=p*l*t;

writeln('Hasil Volume Balok : ',h);

readln;

end.

Sekian Terimakasih.