Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var Kapital, Zinssatz, Laufzeit : integer;
Endkapital : real;
begin
Kapital := StrToInt (edKapital.Text);
Zinssatz := StrToInt (edZins.Text);
Laufzeit := StrToInt (edLaufzeit.Text);
EndKapital := StrToFloat (lbKapital.Caption); // <----- Wozu brauchst du diese Zeile?
Endkapital := Kapital * (Power ( (1 + (Zinssatz / 100)), Laufzeit));
lbKapital.Caption := FloatToStr (Endkapital);
lbJahre.Caption := IntToStr (Laufzeit);
end;
Es reicht, wenn du das 'div' durch ein '/' ersetzt. Damit wird die ganze Berechnung ins real-Format konvertiert.
Dann musst du Kapital, Zinssatz und Laufzeit nicht auch als real deklarieren (integer ist vielleicht in der Aufgabenstellung vorgegeben!?)