Помогите решить задачу по паскалю, Вот задача: Известна длина окружности "с" (с=2пR).Найти площать окружности "с"с данным радиусом. с=2пR R=с2п S=пR во 2 степени.
var
c,r,s:real;
begin
write(dlina okruznosti=);
readln(c);
r:=c/(2*pi);
s:=pi*sqr(r);
writeln(ploshad=,s)
end.
Оцени ответ
