Sinus/kosinus im Dreieck

[Delphi-_-N00b]

hmm..
hab jetzt ArcCos eingegeben, aber es klappt nich


[procedure TForm1.Button1Click(Sender: TObject);
var a, b, c, WinkelAlpha, d: extended;
begin
if Radiogroup1.ItemIndex=0
then
begin
a:=StrToFloat(edit1.Text);
b:=StrToFloat(edit2.Text);
c:=StrToFloat(edit3.text);

d:= (b*b+c*c-a*a)/(2*b*c);

WinkelAlpha:=arccos(d) ;
edit4.text:=FloatToStr(WinkelAlpha);
end;
end;

Identifier not found: ArcCos