Ответы
Ответ дал:
0
const p=3.14;
var l,r,s:real;
begin
write (' введи радиус');
l:=2*p*r;
writeln (' длина окружности =' , l);
s:=p*sqr(r);
writeln (' площадь круга =' , s);
end.
var l,r,s:real;
begin
write (' введи радиус');
l:=2*p*r;
writeln (' длина окружности =' , l);
s:=p*sqr(r);
writeln (' площадь круга =' , s);
end.
Похожие вопросы
2 года назад
2 года назад
6 лет назад
9 лет назад
9 лет назад
9 лет назад