найти сторону треугольника если известны стороны a и b и угол a между ними pascal

var a,b, c, ugolA:inetger;
begin
readln(a);
readln(b);
readln(ugolA);
c := sqr(a*a + b*b - 2*a*b*cos(ugolA);
writeln(ugolA);
end.