Составить блок схему алгоритма и программу для вычисления радиуса описанной окружности по формуле, вычисления производить с двойной точностью.

Pascal

Около какой фигуры описана окружность?

Блок-схема обычного линейного алгоритма, где блок начала, блок ввода данных (параллелограмм (для а)), блок решения (прямоугольник, куда вставляется формула) и вывод данных (тоже параллелограмм). Конец.

Вот простая программа на Паскале.

var r, a:double;

begin

writeln ('Вычисление радиуса описанной окружности около равностороннего треугольника R') ;

write ('Введите длину стороны треугольника а') ;

readln (a) ;

r:=exp (3*ln (a)) / sqrt (3) ;

writeln ('R=', r) ;

end.