Jambiseru.com – Berikut adalah contoh program mencari luas persegi panjang pakai Pascal.
Seri belajar program Pascal ini memang asyik diikuti. Sebab, salah satu program yang relatif mudah dipelajari adalah program pascal.
Berikut contoh program mencari atau menentukan luas persegi panjang pakai Pascal :
Baca Juga di Jambiseru.com – Jambi Seru :
Contoh Program Pascal Ukur Berat Badan Ideal
Penonton Film Spider-Man: No Way Home (2021) Jambi Puas
uses crt;
label 9;
var
PJ: integer;
LB: integer;
LS: integer;
JAWAB: char;
Baca Juga : Contoh Program Pascal Hitung Luas Jajar Genjang
begin
9:clrscr;
writeln(‘—————————‘);
writeln(‘Hitung Luas Persegi Panjang’);
writeln(‘—————————‘);
writeln(”);
write(‘Input Nilai Panjang : ‘);readln(PJ);
write(‘Input Nilai Lebar : ‘);readln(LB);
LS:=(PJ*LB);
writeln(‘Luas Persegi Panjang = ‘,LS);
write(‘Hitung Lagi? (Y/T)’);readln(JAWAB);
IF (JAWAB=’Y’)or(JAWAB=’y’) then goto 9;
readln
end.
Itulah contoh program mencari luas persegi panjang pakai Pascal. Sekali lagi, jangan sampai typo sebab jika typo, sudah bisa dipastikan program tak akan jalan. (red)