как известно площадь круга рассчитывается по формуле s=пr 2.составьте программу нахождения и вывода на экран значения площади круга,если значение радиуса задается с клавиатуры

var r,s:real;beginwrite('R = ');readln(r);s:=2*pi*r*r;writeln('Площадь круга = ',s:6:3);end.Пример:R = 2Площадь круга = 25.133