Вычеслить и вывести на экран площадь круга и длину - вопрос №9551532 от lalka137 10.06.2020 04:46

Question

Информатика: Вычеслить и вывести на экран площадь круга и длину окружности зная радиус( в паскаль)

lalka137 · Answer

program circle;

var S,P,r:real;

const i = Pi;

begin

writeln('Введите радиус окружности');

readln(r);

S:=i*(r*r);

P:=2*i*r;

writeln('Площадь = ',S,', длина = ',P);

end.