Uses crt;var a:integer; S,R,r2,P:real;begin write (Введите сторону a: ); readln (a); S:=((a*a)*sqrt(3))/4; R:=(a*sqrt(3))/3; P:=3*a; r2:=(a*sqrt(3)/6); writeln (Площадь равностороннего треугольника: ,S:1:2); writeln (Радиус описанной вокруг равностороннего треугольника окружности ,R:1:2); writeln (Радиус вписанной в равносторонний треугольник окружности: ,r2:1:2); writeln (Периметр равностороннего треугольника: ,p:1:2);end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.