Arkadaşlar yaklaşık 4 saattir programa kafa yoruyorum ve en sonunda hic bir kod satırım hatalı değil, DELPHİ sin45i 0.850 olarak buluyor. Sin45 0.707 Ben bu sorunu nasıl cozerim. En basit yoluyla aşağıda kod satırlarını veriyorum.

Formunuza birer adet label ve buton yerleştirin.
procedure TForm1.Button1Click(Sender: TObject);
Var
a:Real;
begin
a:=Sin(45);
Label1.Caption:=FloatToStrF(a,ffFixed,9,9);
end;

Kafayı yemek uzereyim yaa, Sin45 Nasıl 0.850 Cıkar arkadaşlar. Hatam nerede??
Cos90=-0.45 cıkartıyor. Cos90=0
Hepsini hatalı hesaplıyor.
__________________