|
|
|
Claire-Redfield
Haudegen
Dabei seit: 23.05.2003
Beiträge: 612
Herkunft: Billertshausen
Internet: 56k Modem
Stimmung: Rollercoaster ;)
Level: 31 [?]
Erfahrungspunkte: 337.583
Nächster Level: 369.628
|
|
| Turbo Pascal, wer hilft mir?! |
|
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
__________________
"Mein Name steht auf meinem Führerschein"
|
|
|
06.10.2004 13:09 |
|
|
FREECER
Moderator
Dabei seit: 05.12.2002
Beiträge: 1.520
Herkunft: Bad Camberg & Alsfeld
Internet: DSL 2Mbit
Stimmung: Immer gut bis schlecht!
Level: 37 [?]
Erfahrungspunkte: 1.094.973
Nächster Level: 1.209.937
|
|
Du musst schon "Zinssatz" auch als Variable deklarieren. Des weiteren hast du ein zwei vegessene ";"
| code: |
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
|
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. |
|
__________________
-----------------------------------------------------
VISIT THIS
|
|
|
06.10.2004 13:15 |
|
|
checker01
Moderator
Dabei seit: 18.12.2002
Beiträge: 725
Herkunft: Flensungen
Internet: DSL
Stimmung: weiss net !
Level: 33 [?]
Erfahrungspunkte: 512.845
Nächster Level: 555.345
|
|
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
|
|
|
06.10.2004 16:05 |
|
|
FREECER
Moderator
Dabei seit: 05.12.2002
Beiträge: 1.520
Herkunft: Bad Camberg & Alsfeld
Internet: DSL 2Mbit
Stimmung: Immer gut bis schlecht!
Level: 37 [?]
Erfahrungspunkte: 1.094.973
Nächster Level: 1.209.937
|
|
Ich hab den Code doch selbst getestet und natürlich kommt es hin weil jede zeile abgeschlossen werden muss, Mensch checker!
__________________
-----------------------------------------------------
VISIT THIS
|
|
|
06.10.2004 16:24 |
|
|
Claire-Redfield
Haudegen
Dabei seit: 23.05.2003
Beiträge: 612
Herkunft: Billertshausen
Internet: 56k Modem
Stimmung: Rollercoaster ;)
Level: 31 [?]
Erfahrungspunkte: 337.583
Nächster Level: 369.628
|
|
Merci!
Habs mal abgeschrieben und ausgedruckt...werds heute abend nach der Arbeit mal austesten. Danke für die Hilfe!
LG
Anna
__________________
"Mein Name steht auf meinem Führerschein"
|
|
|
07.10.2004 15:07 |
|
|
CJ Rayne
Tripel-Ass
Dabei seit: 10.05.2003
Beiträge: 249
Herkunft: Alsfeld
Internet: Asynchronous Digital Subscriber Line 0.75MBit Downstream 0.125MBit Upstream
Stimmung: Stimmung schlecht, Einstellung schlechter, Leben beschissen. Wieso lebe Ich (noch)???
Level: 27 [?]
Erfahrungspunkte: 140.546
Nächster Level: 157.092
|
|
Wer ernsthaft coden will sollte sich mal in C++ versuchen, oder Assembler
__________________
Gib mir Gelassenheit, Dinge hinzunehmen, die Ich nicht ändern kann, gib mir den Mut, Dinge zu ändern, die Ich ändern kann und gib mir die Weisheit, das eine vom anderen zu unterscheiden.
|
|
|
08.10.2004 17:07 |
|
|
ScR4tCh
Doppel-Ass
Dabei seit: 03.09.2003
Beiträge: 119
Internet: Sputnik Uplink
Stimmung: :]
Level: 23 [?]
Erfahrungspunkte: 53.379
Nächster Level: 62.494
|
|
@CJ: *Räusper* und JAVA nicht vergessen ....
__________________
Möge der Saft mit euch sein
|
|
|
13.10.2004 22:11 |
|
|
FREECER
Moderator
Dabei seit: 05.12.2002
Beiträge: 1.520
Herkunft: Bad Camberg & Alsfeld
Internet: DSL 2Mbit
Stimmung: Immer gut bis schlecht!
Level: 37 [?]
Erfahrungspunkte: 1.094.973
Nächster Level: 1.209.937
|
|
| Zitat: |
Original von CJ Rayne
Wer ernsthaft coden will sollte sich mal in C++ versuchen, oder Assembler
|
Hat hier jemand von " ernsthaft coden" gesprochen?!
__________________
-----------------------------------------------------
VISIT THIS
|
|
|
14.10.2004 10:28 |
|
|
|
|
|
|
