Program n_2;
const pi=3.14;
var r,c,s: real;
begin
writeln('Вычисление длины окружности и площиди круга');
write('Введите r>>);
readln(r);
c:=2p*pi*r;
s:=pi*r*r;
writeln ('c=', c:6:4);
writeln ('s=', s:6:4)
end.

Ilya78324    1   07.04.2020 13:19    47