задание на фото.помогите пожалуйста.

Приложения:

Ответы

Ответ дал: SalohiyatDP
0
var
s,r:real;
begin
readln r;
s:=3,14*r*r;
writeln s;
end.

SalohiyatDP: Ест ошибка! Осталос скобки!
readln (r);
И
writeln (s);
Вас заинтересует