Составьте алгоритм по нахождению площади окружности у которой радиус и координаты точки центра пользователем произвольно

Для площади координаты центра не нужны

var
    r: real;

begin
    read(r);
    writeln(Pi * r * r);
end.