Даны действительные положительные числа a, b, c, которые задают длины сторон…

Var a, b, c, aa, ab, ac: real; function Arcsin (x: real): real; beginArcsin: =Arctan (x/Sqrt (1-sqr (x); end; //магия. В паскале нет функции арксинус или арккосинус, поэтому приходится выражать через арктангенс.begin read (a, b, ac); ac: =ac*pi / 180; // перевод в радианы c: =sqrt (sqr (a)+sqr (b) — 2*a*b*cos (ac); aa: =arcsin (a*sin (ac) / c); ab: =pi — aa — ac; writeln (a, ', b, ', c); writeln (aa*180 / pi, ', ab*180 / pi, ', ac*180 / pi); end.