Menghitung Luas Dan Kelililing Persegi Panjang Dengan Pascal

Menghitung Luas dan Keliling Persegi Panjang Menggunakan Pascal

Untuk membuat program menghitung luas dan keliling persegi panjang dengan Pascal maka yang perlu kita perhatikan yakni pemberian nama variabel dan tipenya, rumus luas dan keliling persegi panjang.Disini kita belajar pemakaian perintah write dan writeln.Apa yang terjadi jika kita memakai write.Dan apa yang terjadi jika kita memakai writeln.Perlu disimak.

Codingan untuk program diatas dapat saya buat sebagai berikut :

uses crt;

var panjang,lebar,luas,keliling : integer;

begin

clrscr;

writeln ('Masukan panjang persegi panjang : ' );

readln;

writeln ('Masukan lebar persegi panjang  : ' );

readln;

luas := panjang*lebar;

keliling := 2*(panjang+lebar);

writeln ('Luas persegi panjang adalah : ' , luas);

writeln ('Keliling persegi panjang adalah : ' ,keliling);

readln;

end.

Out put dari program diatas yaitu : 

 

Demikianlah posting dari saya.Silakan dicoba.Semoga bermanfaat untuk anda.Terima kasih.