Для вычисления длину окружности и площадь круга . Радиус окружности задаётся с клавиатуры.(формулы :дл. окр . C=2*3,14*R, Sкруга =3,14*R*R,где R- Радиус. Мы работаем в операторе принт

Длина окружности вычисляется по формуле l=2*pi*r Длина окружности

Площадь круга по формуле s=pi*r*r Площадь круга

ну и само решение

program ploshad;

const

pi = 3.14;

var

s : real; { Площадь круга }

r : real; { Радиус }

l : real; { длина окружности }

begin

writeln('Введите радиус. ');

readln(r);

s := pi*r*r;

l := 2*pi*r;

writeln('Площадь круга = ', s:2:2);

writeln('Длина окружности = ', l:2:2);

writeln('Нажмите ентер. ');

readln;

end.

Объяснение: