MENCARI RUMUS LINGKARAN

uses wincrt;
var
r,d,l,k:real;       
begin
write ('masukan jari-jari:');readln(r);
d:=2*r;
l:=3.14*r*r;
k:=2*3.14*r;
writeln('diameternya:',d:4:0);
writeln('luasnya:',l:4:0);
writeln('kelilingnya:',k:4:0);
end.

DOWNLOAD FILE