Паскаль.найдите sкруга и длину окружности. числа не даны.там начало : program: zadacha333; var..

FizTex FizTex    1   14.03.2019 21:40    38

Ответы
malyshewacarina malyshewacarina  25.05.2020 10:49

var S,R,c: real;

begin

writeln('Введите радиус круга: ');

readln(R);

S:=Pi*sqr(R);

c:=2*Pi*R;

writeln('S = ',S);

writeln('c = ',c);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика