Program Menghitung persegi mengguana Pascal

PASCALMEMBUAT PROGRAM PENGHITUNG LUAS PERSEGI

di postingan kali ini saya akan membuat sedikit tutor membuat rumus penghitung persegi panjang yang sangat sederhana

gbr 1. kode

gbr 2 hasil progran setelah di run

sortcode nya jika ingin copas

program persegi;
uses crt;
var panjang, lebar, luas:integer;
begin
clrscr;
write('Masukkan panjang : '); readln(panjang);
write('Masukkan lebar : '); readln(lebar);
luas:=panjang*lebar;
write('Luas persegi panjang : ',luas);
readln;
end.