Дана длина L окружности. Найти ее радиус R и площадь S круга, ограниченного этой окружностью, учитывая, что L = 2·π·R, S = π·R2. В качестве значения π использовать 3.14 — Pascal(Паскаль)

program okruj;
const pi = 3.14;
var L, S, R: real;
begin
    write('Введите длину окружности: ');
    read(L);
    R := L / (2 * pi);
    S := pi * sqr(R);
    writeln('Площадь круга -- ', S:5:2);
    writeln('Радиус круга -- ', R:5:2);
end.