Дана сторона равностороннего треугольника. Найти площадь этого треугольника, его высоту, радиусы описанной и вписанной окружностей.На языке паскале

спасибо большое

Прежде всего - формулы. Пусть а - длина стороны, тогдаvar  a, r, rr, h, s: real;begin  Write('Введите длину стороны треугольника: ');Readln(a);  r := sqrt(3) * a / 6;  rr := 2 * r;  h := 3 * r;  s := a * h / 2;  Writeln('Радиус вписанной окружности ', r);  Writeln('Радиус описанной окружности ', rr);  Writeln('Высота треугольника ', h);  Writeln('Площадь треугольника ', s);end.Тестовое решение:Введите длину стороны треугольника: 10Радиус вписанной окружности 2.88675134594813Радиус описанной окружности 5.77350269189626Высота треугольника 8.66025403784439Площадь треугольника 43.3012701892219