Известна длина окружности. Найти площадь круга, ограниченного этой окружностью. PASCAL

Предыдущий
вопрос Следующий
вопрос

program circleArea;
var
circumference, radius, area: real;
begin
write('Enter the circumference of the circle: ');
readln(circumference);

radius := circumference / (2 pi);
area := pi radius * radius;

writeln('The area of the circle is: ', area:0:2);
end.