Паскаль. Проверьте меня...

[Кириллович]

Составить программу: Найти площадь треугольника с основанием L и углами А, В, С, где Y>0 и Z не равен 0, п/2

S= (L^2*sinB*sinC)/2sinA

где L= (3+e^(y-1))/(1+x^2 lny-tgz)

Решил так:
program noname;
var A, B, C, Z, M, N, O, P, L, S, x, y: real;
begin
writeln ('Введите значения углов треугольника A, B, C, а также Z не равного 0, 90, и переменных x и y, где y > 0 ');
readln (A, B, C, Z, x, y);
M:=A*Pi/180;
N:=B*Pi/180;
O:=C*Pi/180;
P:=Z*Pi/180;
L:=(3+exp(y-1))/(1+(sqr(x)*ln(y))-(sin(P)/cos(P)));
S:=(sqr(L)*sin(N)*sin(O))/(2*sin(M));
writeln ('Площадь треугольника равна =',S);
end.

[Sazary]

Найти площадь треугольника с основанием L и углами А, В, С, где Y>0 и Z не равен 0, п/2

о_О
Кто такие Y и Z?

[Кириллович]

Сообщение от Sazary

о_О
Кто такие Y и Z?

Я так понял, что это переменные для нахождения длины L. Другого объяснения найти не могу. Текст задания привел дословно...

[Sazary]

Кириллович, дело в том, что при такой формулировке, я даже не знаю что вводить.

Если дано основание и 3 угла, то по теореме синусов можно найти остальные стороны. Ну а дальше по формуле Герона, например.

[Кириллович]

Так вот я и советуюсь, потому как сам не мог понять, что надо! (Причем так называемая "методичка" с этим заданием 1995 года издания) Не мог найти никого кто бы до меня это решал. Чем-то 14 лет люди занимались!

[Sazary]

Ну я бы сделал так, как описал. Зачем там какие-то Y и Z - мне лично непонятно..