Question

Начертите блок схему и напишите программу на языке Pascal для решения следующей задачи : Вычислите длину окружности и площадь круга если дан радиус r.

Answer 1

Var r: integer;l: real;BeginWriteln('Введите радиус');Read(r);l:=2*3.14*r;Writeln('Длина окружности - ', l);End.