The radius of the circle is given. Write a program to calculate the circumference and area of a circle.

var
r: real; – variable for storing the radius.
C: real; – a variable for storing the circumference.
S: real; – variable for storing the area of the circle.

begin
writeln (‘Enter the radius of the circle:’);
readln (r);
C: = pi * (2 * r);
S: = pi * sqr (r);
writeln (‘The length of a circle with a radius’, r, ‘is equal to’, C);
writeln (‘Area of a circle with radius’, r, ‘is equal to’, S);
end.



One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.