Program Mencari Luas Persegi Panjang Pakai Pascal

  • Whatsapp
Mencari Luas Persegi Panjang Pakai Pascal
Program mencari luas persegi panjang pakai pascal. Foto: Jambiseru.com

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 : Contoh Program Pascal Ukur Berat Badan Ideal

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)

Pos terkait