Вычеслить и вывести на экран площадь круга и длину - вопрос №9551757 от StePAHka228 04.06.2023 01:50

Question

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

StePAHka228 · 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.