Menghitung Luas Persegi Panjang

Buatlah aplikasi untuk menghitung luas sebuah persegi panjang. Input berupa panjang (p) dan lebar (l).
Rumus luas persegi panjang = panjang x lebar

Jawaban:

program Project1;

var
  panjang, lebar, luas : real;

begin
  write('Masukkan panjang bidang persegi panjang = ');
  readln(panjang);
  write('Masukkan lebar bidang persegi panjang = ');
  readln(lebar);
  luas := panjang * lebar;
  writeln('Luas Persegi Panjang = ', luas:2:2);
  readln;
end.

Latihan pengembangan:
Buatlah program untuk menghitung keliling bidang persegi panjang dengan rumus sebagai berikut:
Keliling Persegi Panjang = 2 x (panjang + lebar)