Zinseszins

[mola]

Da sind leider immer noch Fehler drin

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
function Power (Base,Exponent:Extended):Extended;
var  eintritt,rate,Austritt,
Anzahl,Abzug,Abzug2,gesamtabzug,Beitrag,KApital:real;
hoch:extended;
begin
Edit1.Text:=FloatToStr(eintritt);
Edit2.Text:=FloatToStr(Rate);
Edit3.Text:=FloatToStr(Austritt);

Anzahl:=Austritt-Eintritt;
Abzug:= (Rate*4)/100;
Abzug2:=(Rate*10)/100;
gesamtabzug:=Abzug+Abzug2;
Beitrag:=rate-gesamtabzug;
hoch:=power(1.05,Anzahl);
Kapital:=Beitrag*hoch-1/(hoch*(hoch-1));
Edit4.Text:=FloatToStr(Kapital);
end;

DAs Programm gibt als Fehlermeldung an:
VAriable 'Austritt' might not have been initialized
VAriable 'rate' might not have been initialized
VAriable 'Eintitt' might not have been initialized
Return value of function 'Power'might be undefined
BEgin expected but end found
declaration expected but end of file found

Vielen Dank für eure Hilfe

[edit=FuckRacism]Delphi-Syntax Mfg, FuckRacism[/edit]