Сделать задачу в паскале. Длина окружности - С . Определить радиус окружности и 1/4 части площади круга ,ограниченного этой окружности. Помогите пожалуйста.
var c:real;
begin
write ('Введите длину окружности: ');
read(c);
writeln ('Радиус равен: ', c/(2*pi):0:3);
writeln ('1/4 площади круга равна: ', pi*sqr(c/(2*pi))/4:0:3);
end.