program Circle;varradius, area, circumference: real;beginwrite('Enter the radius of the circle: ');readln(radius);
area := pi radius radius;circumference := 2 pi radius;
writeln('The area of the circle is: ', area:0:2);writeln('The circumference of the circle is: ', circumference:0:2);end.
program Circle;
var
radius, area, circumference: real;
begin
write('Enter the radius of the circle: ');
readln(radius);
area := pi radius radius;
circumference := 2 pi radius;
writeln('The area of the circle is: ', area:0:2);
writeln('The circumference of the circle is: ', circumference:0:2);
end.