rechenprogramm

[Sharky]

Hai gelvuun,

ersteinmal: "Herzlich Willkommen in der Delphi-PRAXiS".

Bei allen Antworten musst Du bitte eines beachten!!!

Delphi berechnet den Cos/Sin usw. im Bogenmass. Wenn Du den Winkel im Gradmass hast musst Du diesen erst umwandeln.

Delphi-Quellcode:

procedure TForm1.btn_Button1Click(Sender: TObject);
var
  a: extended;
  b: extended;
begin
  a := 45;
  b := Cos(GradToRad(a));
  ShowMessageFmt('Der Cosinus eines Winkels von %g ° beträgt %g', [a, b]);
end;