Das Haus vom Nikolaus Konsolenanwendung

[Namenloser]

Du hast begin und end falsch gesetzt.Wenn du deinen Code ordentlich einrücken würdest, würde dir das auffallen:

Delphi-Quellcode:

program Project2;

uses
  Forms;

{$AppType Console}
var i,j:Integer;
begin
  for i:=1 to 10 do 
  begin
    writeln('x');
    readln;
    if (i=1) then 
    begin
      for j:=1 to 10 do
        write('x');
      read;
    end; // if
  end; // for
end.

[hotkey]

Das hilft mir leider auch nicht weiter.. Jetzt erscheint nur ein x...

[Namenloser]

Zitat von hotkey:

Das hilft mir leider auch nicht weiter.. Jetzt erscheint nur ein x...

Ich habe an deinem Code nichts verändert. Ich habe ihn nur ordentlich formatiert.

Weißt du überhaupt was die Befehle readln und read machen?

[hotkey]

Ja , das weiß ich.

Kannst du mir Tipps geben , wie ich das hinkriege ?

[Namenloser]

Zitat von hotkey:

Ja , das weiß ich.

Sicher? Denn in deinem Code machen sie überhaupt keinen Sinn.

[hotkey]

Komisch , so hat das mein Informatik-Lehrer auch gemacht und es funktioniert , wie erklärst du mir das ?

Wenn ich ganz normal in Delphi programmiere benutze ich diese read-Befehle nicht , aber bei dieser Konsolenanwendung sollen wir das so machen.

Read liest Werte ein

[Namenloser]

Richtig, aber read ist eine blockierende Operation, das heißt, das Programm wird so lange angehalten, bis ein Wert eingegeben wurde. Kommentiere mal alle read*-Befehle aus, und du solltest schon fast das gewünschte Ergebnis erhalten.