Make a program for finding the area of a circle by its radius, which is entered from the keyboard. in Pascal

var
r, s: real; // declare variables in which we will store the value of the radius and area
begin
writeln (‘Enter the radius of the circle’); // display a text string
readln (r); // enter the radius value from the keyboard and write it to the r variable
s: = 3.14 * power (r, 2); // calculate the area of the circle and write it to the variable s
writeln (‘The area of the circle is =’, s); // display the area value
end.