Наберите программу площади круга
Const p=3.14;
var r,s:real;
begin read(r);
writeln(Площадь круга= ,p*sqr(r));
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Const p=3.14;
var r,s:real;
begin read(r);
writeln(Площадь круга= ,p*sqr(r));
end.