PASCAL MENGHITUNG LUAS BALOK


Untuk menghitung luas persegi panjang pada aplikasi turbo pascal, anda dapat menulis perintah sebagai berikut :

Program menghitung_luas_persegi_panjang ;
Uses crt;
Var luas,P,L:integer;
Begin
Clrscr;

Write (‘masukan panjang=’);
Readln (P);
Write (‘masukan lebar=’);
Readln (L);

Luas:=P*L;
Write (‘luas persegi panjang adalah:’,Luas);
Readln;
End.




hasil setelah di RUN




Postingan populer dari blog ini

MEMASUKAN PRESET KAMERA RAW KE ADOBE PHOTOSHOP CC

MEMBUAT LOGO SCTV DI COREL DRAW

Cara Menampilkan folder yang tersembunyi (hidden) di windows 7