Coding pemrograman Free Pascal Menghitung Volume Balok

Nama : Isna nurul imaniah

kelas : TKJ XI.3 Smk Nu

Coding pemrograman Free Pascal Menghitung Volume Balok

====================================================================

Program Volume_Balok;
uses WinCrt;
var p,l,t,h:integer;
Begin
Write('Masukan Nilai Panjang: ');
readln(p);
Write('Masukan Nilai Lebar: ');
readln(l);
Write('Masukan Nilai Tinggi: ');
readln(t);
Writeln;
h:=p*l*t;
Writeln('Jadi Volume Balok: ',h);
readln;
end.

====================================================================

Sekian Coding Dari Saya Semoga Berguna :)

Thank's dah mampir ke blog aku :)