Составить программу для вычисления площади круга, радиус которой нужно ввести с

program zz1;
var
L,  r : real; // задаем переменные не целого типа
begin
write( введите радиус круга ); // вводим с клавиатуры начальный радиус круга
read(r);

L:=Pi * r * r; // вычисляем площадь круга по формуле
write( площадь круга = , L:5:2); // выводим ответ, пять символов для всего числа и два знака после точки
end.