Program Mengukur Volume Balok dengan Pascal

Bagaimana membuat program pengukur volume balok dengan program pascal?

Buka program TPW dan ketikkan yang ada dibawah ini!

program Volume_balok;

uses wincrt;

var

p,l,t,volume:real;

begin

clrscr;

write('inputkan nilai panjang=');

readln(p);

write('inputkan nilai lebar=');

readln(l);

write('inputkan nilai tinggi=');

readln(t);

volume:=p*l*t;

write('maka volume balok=',volume:5:2);

end.

Selamat mencoba..!