Станислав
5 год назад
Написать программу вычисления площади произвольного шестиугольника
ОТВЕТЫ
Valerij
Oct 24, 2020
Var
a: integer;
Begin
WriteLn('S = 3√3a² / 2');
Write('Длина стороны(a) = ');ReadLn(a);
WriteLn('Площадь(S) = ', 3*Sqrt(3)*a*a/2);
End.
a: integer;
Begin
WriteLn('S = 3√3a² / 2');
Write('Длина стороны(a) = ');ReadLn(a);
WriteLn('Площадь(S) = ', 3*Sqrt(3)*a*a/2);
End.
661
Смежные вопросы:
