Turbo Pascal, wer hilft mir?!

Claire-Redfield · 06.10.2004, 12:09

Wir lernen in der Schule gerade Turbo Pascal...auf jeden Fall sollte ich was zum laufen bringen, es haut aber nicht hin, bekomm ständig ne Fehlermeldung (Fehler 3: Unbekannter bezeichner) weiß jmd. was da falsch ist?

program zinsrechnung

uses Wincrt;
var zinsen, Betrag: real;
Endkapital: integer

begin
write ('Eingabe Betrag: ');
readln (Betrag);
write ('Eingabe Zinssatz: ');
readln (Zinssatz);
Zinsen:= Betrag * 0,01 * zinssatz/360;
Endkapital:= Betrag+Zinsen
writeln ('Zinsen:',Zinsen:10);
writeln ('Endbetrag:'Endkapital:10:2);

end.

Der fette Satz ist der wo der Fehler auftaucht...möglicherwese sind aber noch mehr drin...weiß jmd. weiter?

LG
Anna

FREECER · 06.10.2004, 12:15

Du musst schon "Zinssatz" auch als Variable deklarieren. Des weiteren hast du ein zwei vegessene ";"

Code:

program zinsrechnung;

uses crt;
var zinsen, Betrag: real;
var Endkapital: real;
var Zinssatz: real;

begin
clrscr;
write ('Eingabe Betrag: ');
readln (Betrag);
write ('Eingabe Zinssatz:');
readln (Zinssatz);
Zinsen:= Betrag * 0.01 * zinssatz/360;
Endkapital:=Betrag+Zinsen;
writeln;
writeln ('Zinsen:',Zinsen:10:2,' EURO');
writeln ('Endbetrag:',Endkapital:10:2,' EURO');
readln;
end.

checker01 · 06.10.2004, 15:05

teste mal den code von freecer, meiner meinung kommt bei :

Endkapital:=Betrag+Zinsen(

das semikolon am ende nicht hin, aber kenne halt die ANSI Richtlinie nicht auswendig, kann sein dass es hinkommt :-)

aber turbo pascal war schon geil, so schön einfach