Дана длина окружности. найти площадь круга ограниченного этой окружностью. в качестве значения pi использовать 3.14. программа в паскале.

Begin
var l:real;
read (l);
writeln ('R = ', l/(2*3.14));
writeln ('S = ',3.14*sqr(l/(2*3.14)));
end.