Дан радиус окружности, описанной около правильного 6-угольника. Найти площадь. через паскаль
площадь чего?
шестиугольника
Var s,r:real; begin write('введите радиус описанной окружности'); readln(r); s:=3*sqrt(3)*r*r/2; writeln('площадь равна= ',s:6:2); end. и все