Для фигур: равностороннего треугольника, квадрата, правильных 5-угольника, 6-угольника, …, N-угольника дана длина стороны А (одна и та же). Вычислить площади S этих геометрических фигур. (Pasсal)
Вы бы хоть правильно название языка писали...((
Var a, S: real; n: integer; begin Write('Введите через пробел длину стороны многоугольника и число сторон: '); Readln(a, n); S := n * sqr(a) / (4 * tan(Pi / n)); Writeln('Площадь многоугольника равна ', S:0:4); end. Тестовое решение: Введите через пробел длину стороны многоугольника и число сторон: 5 10 Площадь многоугольника равна 192.3552
спасибо
в паскале пишет под tan неизвестный идентификатор