Registriert seit: 7. Jan 2006
Ort: Pulheim Brauweiler
464 Beiträge
Delphi 2010 Professional
|
Re: Turmrechenprogramm
5. Jun 2009, 19:44
Hi,
dann bereinige mal deinen Quelltext
Delphi-Quellcode:
program turmrechner;
uses crt;
var zaehler:integer;
zahl, ergebnis:longint;
ergebnis1:real;
begin
clrscr;
writeln('Das hier ist ein Turmrechenprogramm. Bitte geben Sie Ihre Startzahl ein!');
readln(zahl);
zahl:=ergebnis;
FOR zaehler:=1 TO 9 DO
begin
ergebnis:=zahl*zaehler;
writeln('zahl,'X' ,zaehler, '=',ergebnis); <<<<<< das erste Anführungszeichen ist wohl zu viel !!
end;
FOR zaehler:=9 DOWNTO 1 DO
begin
ergebnis:=zahl/zaehler;
writeln('zahl,'/' , zaehler, '=',ergebnis); <<<<<<< hier ebenso !!
end;
writeln('Ende der Schleife!');
writeln('Zaehlerstand am Ende der Schleife: ',zaehler);ä <<<<<<<<<<<<< und was macht das ä hier ?
readln;
end.
|
|
Zitat
|