Menghitung luas dan keliling persegi panjang ( pseudocode )
program hitung_luas_dan_keliling_persegi_panjang
var panjang, lebar, luas, keliling: integer;
read(panjang) ;
read(lebar) ;
luas (panjang * lebar);
keliling (2 * panjang + lebar);
write (luas);
write (keliling);