Вычислить площадь круга
Pascal ABC
var
r:real;
begin
read(r);
r:=3.14*r*r;
writeln(S=,r);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
var
r:real;
begin
read(r);
r:=3.14*r*r;
writeln(S=,r);
end.