Составить программу, запрашивающую радиус окружности и вычисляющую длину окружности и площадь круга Сделать нужно в программе Free Pascal
Var r,p,s:real; begin write('Введите радиус окружности: '); read(r); p:=2*pi*r; s:=pi*sqr(r); writeln('Длина окружности L = ',p:0:3); writeln('Площадь круга S = ',s:0:3); end.