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.