Einzelnen Beitrag anzeigen
Ungelesen 26.01.14, 17:17   #6
MrGreEn1231
Anfänger
 
Benutzerbild von MrGreEn1231
 
Registriert seit: Mar 2011
Beiträge: 26
Bedankt: 1
MrGreEn1231 ist noch neu hier! | 0 Respekt Punkte
Standard

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.
MrGreEn1231 ist offline   Mit Zitat antworten