Sinus til PI giver -5,42101086242752E-20

Uanset hvor nøjagtigt man kan regne, vil man aldrig kunne få den præcise værdi af Pi. Derfor vil sin(Pi) heller aldrig kunne blive præcist, igen lige meget hvor nøjagtigt man regner. Men - det resultat du får er altså ikke ret stort (-0. <19 nuller> 542...). Er det ikke godt nok?

Så må jeg selv lave mig en funktion, så den tester om input til Sin() er pi eller 2pi eller 3pi eller...

Jeg troede, det var et problem med variablen... Men tak for det åbenlyse svar.

Hvis jeg var dig ville jeg benytte en lidt anden metode: Beslut med dig selv hvor lille den absolutte værdi af sin skal være, for at du vil opfatte det som 0. Lav din funktion så den tester på dette, istedet for om brugeren kommer med en værdi, der er et multiplum af Pi.

Forklaring: Da Pi (som vel er en konstant stillet til rådighed af Delphi) i sig selv ikke er nøjagtig, må det give et bedre resultat at undertrykke meget små resultater af sin end at definere at bestemte værdier af sin's argument skal resultere i 0. Med din ide kan man faktisk i værste fald risikere, at din funktion (sin-approksimation) ikke er monoton i omegnen af Pi!

Jesper - jeg er enig med dig i at din metode vil være den bedste, men den vil for så vidt heller ik være monoton...det er små detaljer, men matematisk set... :)

Kan du ikke bare lave din egen sin-funktion?

function MySin(Rad: Extended): Extended;
begin
  if Rad = Pi then
    Result := 0
  else
    Result := Sin(Rad);
end;