Дан радиус окружности.найти длину окружности и площадь круга(код pascal)

slaapwandelaar slaapwandelaar    1   11.09.2019 02:40    0

Ответы
MartiKetris MartiKetris  09.09.2020 23:58
Var r,c,s:real;
begin
readln(r);
c:=2*pi*r;
s:=pi*r*r;
writeln('C = ',c:5:2,' S = ',s:5:2);
end.

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