здравствуйте,посмотрите пожалуйста правильно или нет
3.вычислить площадь треугольника со сторонами k и плижащими углами a и b

S=1/2*A*k*sin[b]

A/sina=B/sinb=K/sin[k]

A=(k*sin[a])/sin[k]


ргogram tr;

Var a,b,k:integer;

S:integer;

begin

Readln(‘a = ’,a,’b = ’,b,’k= ‘,k);

S:=0.5*((sin[a]*sin[b]*k^2)/sin[180-a-b]);

Writeln(s);

End.

Т.е. все стороны треугольника равны?