Ответы
Ответ дал:
0
var
r:real;
begin
read(r);
r:=3.14*r*r;
writeln('S=',r);
end.
Ответ дал:
0
program krug;
var
r,otvet:real;
begin
readln(r);
otvet:=3.14*sqr(r);
writeln('S=',otvet);
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад