Make a program for calculating the area of a circle, the radius of which must be entered

Make a program for calculating the area of a circle, the radius of which must be entered from the keyboard, the number p is considered equal to 3.14.

program zz1;
var
L, r: real; // set variables of non-integer type
begin
write (‘enter the radius of the circle’); // enter the initial radius of the circle from the keyboard
read (r);

L: = Pi * r * r; // calculate the area of the circle using the formula
write (‘area of a circle =’, L: 5: 2); // print the answer, five characters for the whole number and two characters after the dot
end.