Du kannst es gerne ausprobieren...
Quelltext von Probe Cosinus eines Winkels in Degree:
program project1;
{$mode objfpc}{$H+}
{$APPTYPE CONSOLE}
uses
sysutils, windows, Console,math;
VAR gamma,cosa:double;
BEGIN
ReadLn (gamma);
Cosa:=Cos (gamma);
WriteLn (cosa:2:1);
ReadLn ();
End.
Es kommt bei Cos 60° -1 raus, obwohl es 0,5 sein sollte.
Bei 45° kommt 0,5 raus, obwohl es 0,707 sein sollte...
__________________
Wer Rechtschreibfehler findet, darf sie behalten.
|