program TriangleAngles;

var
a, b, c: real;
alpha, beta, gamma: real;
angleDegrees, angleMinutes, angleSeconds: integer;

begin
writeln${}^{\prime }Enterthelengthsofthesidesofthetriangle{:}^{\prime }$;
readln$a,b,c$;

// Calculate the angles using the Law of Cosines
alpha := arccos$(b<em>b+c</em>c-a<em>a)/(2</em>b<em>c)$;
beta := arccos$(a</em>a+c<em>c-b</em>b)/(2<em>a</em>c)$;
gamma := arccos$(a<em>a+b</em>b-c<em>c)/(2</em>a\ast b)$;

// Convert the angle alpha to degrees, minutes and seconds
angleDegrees := round$alpha<em>180/pi$;
angleMinutes := round$(alpha</em>180/pi-angleDegrees)<em>60$;
angleSeconds := round$(((alpha</em>180/pi-angleDegrees)<em>60)-angleMinutes)</em>60$;

writeln${}^{\prime }Anglesofthetriangle{:}^{\prime }$;
writeln${}^{\prime }Alpha{:}^{\prime },angleDegrees{,}^{\prime }degree{s}^{\prime },angleMinutes{,}^{\prime }minute{s}^{\prime },angleSeconds{,}^{\prime }second{s}^{\prime }$;
writeln${}^{\prime }Beta{:}^{\prime },beta<em>180/pi:0:2{,}^{\prime }degree{s}^{\prime }$;
writeln${}^{\prime }Gamma{:}^{\prime },gamma</em>180/pi:0:2{,}^{\prime }degree{s}^{\prime }$;
end.