Cara Membuat Program Luas Lingkaran Dengan PASCAL

Hari ini Aqo mao Ngasih cara Membuat Program dgn PascaL,..
yg x Ni adl program Luas Lingkaran,..
caps Cus eaa...:


program luas_lingkaran;
uses wincrt;
var
r, luas: integer;
begin
clrscr;
writeln(' Luas Lingkaran ');
writeln('===============');
write('input nilai Jari-jari :');readln(r);
luas:=(22 div 7)*r*r;
writeln('luas persegi panjang : ',luas);
end.

selesai,..
Selamat_Mencoba yaa... 

Lihat juga: Info Terbaru Bitcoin di Digital currency exchange listing

Load disqus comments

0 komentar





bitter.io - Free bitcoin, bitcoin advertising, ptc