ПРОШУ ПОМОГИТЕ, ПОЖАЛУЙСТА!!! НАПИСАТЬ ПРОГРАММУ ** ЯЗЫКЕ ПАСКАЛЬ ДЛЯ ВЫЧИСЛЕНИЯ ПЛОЩАДИ...

Question

ПРОШУ ПОМОГИТЕ, ПОЖАЛУЙСТА!!!
НАПИСАТЬ ПРОГРАММУ НА ЯЗЫКЕ ПАСКАЛЬ ДЛЯ ВЫЧИСЛЕНИЯ ПЛОЩАДИ И ДЛИНЫ ОКРУЖНОСТИ. РАДИУС ВВОДИТСЯ С КЛАВИАТУРЫ.

Answer 1

Program Circle;
var r,s,l:real;
begin
write('Введите радиус ');
read(r);
s:=Pi*sqr(r);
l:=Pi*r*2;
writeln('Площадь окружности = ',s,', а длина = ',l);                           
end.