Mathe und Physik

[Luckie]

Delphi-Quellcode:

uses
  math;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(FloatToStr(RadToDeg(ArcTan(1))));
end;

Und die Formel solltest du in jeder besseren Formelsammlung finden. Umstellen solltest du alleine können.