Question

Составить программу через Pascal ABC. Дана длина L окружности. Найти ее радиус R и площадь S круга, ограниченного этой окружностью, учитывая, что L = 2*Pi*R, S = Pi*R2 ( R в квадрате ). Pi = 3.14
P.S Напишите полную программу

Answer 1

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