Assalammualaikum wr.wb.
Di artikel pertama saya,saya akan berbagi tips pemograman dari TURBO PASCAL 7,0 .
langsung saja yah !!!
saya akan membuat program persegi panjang !!!
program persegi_panjang;
uses crt;
var
a,b,c:integer;
panjang:integer;
lebar:integer;
luas:real;
begin
clrscr;
write('masukan NAMA:');
readln(a);
write('masukan NIRM:');
readln(b);
write('masukan KELAS:');
readln(c);
write('masukan nilai panjang:');
readln(panjang);
write('masukan nilai lebar:');
readln(lebar);
luas:=panjang*lebar;
writeln('luas persegi panjang =',luas);
readln;
end.
Silakan di coba yah !!! Semoga bermanfaat ^_^
tunggu artikel selanjutny yah :P
Tidak ada komentar:
Posting Komentar