Написать программу для вычисления длины и площади окружности если r=5,9.ввод с клавиатуры

Question

Написать программу для вычисления длины и площади окружности если r=5,9.ввод с клавиатуры

Answer 1

const   pi = 3.14;  
var   R: real;  
begin  
write(' R = ');  
readln(R);  
writeln;   writeln('Длина окружности: ', 2 * pi * R:0:2);  
writeln('Площадь круга: ', pi * sqr(R):0:2)
end.
Благодарность если не сложно.