Вычислить площадь круга Pascal ABC

Вычислить площадь круга Pascal ABC
Гость
Ответ(ы) на вопрос:
Гость
var r:real; begin read(r); r:=3.14*r*r; writeln('S=',r); end.
Гость
program krug; var r,otvet:real; begin readln(r); otvet:=3.14*sqr(r); writeln('S=',otvet); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы