Geometrische Körper ausrechnen

[Thanatos81]

Lass einfach deine Deklaration weg. Und schreibst ganz normal Pi in deinen Code.

Die Unit math musste auch nicht einbinden, da Pi auch in der System.pas ist. Kannst ja mal ein leeres Projekt mit nem Button anlegen und das hier ausprobieren:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var A,r : Real;
begin
  r := 2.3;
  A := pi * r*r;
  showMessage(FloatToStr(a));
end;

edit:
Fehler im Code beseitigt. Hate r² stat r*r geschrieben. Danke für den Hinweis, Ultimator.