Programm Böse Sechs

[LTE5]

Geh deinen Code mal Wort für Wort durch und beantworte mir dann folgende Frage:

was passiert, nachdem einmal gewürfelt wurde exakt?

[Coolend]

Genau das ist mein Problem ich habe keine ahnung was jetzt kommt.
Habe jetzt die while-schleife ausprobiert.

Delphi-Quellcode:

while (wurf<>6) do
wurf:=random(6)+1;
begin
  spielstand:=spielstand+wurf
end;
writeln(spielstand);
readln();
end.

aber da kommt auch nichts richtiges zustande.
Ist die while schleife denn richtig oder die for-schleife ?

[LTE5]

Das zweite sieht schon besser aus, ist aber trotzdem falsch.
Lies mal Wort für Wort durch was dein Programm macht und stell das dann dem gegenüber was es machen soll.

Hat euch eurer Lehrer keine Grundlagen beigebracht?

[Coolend]

Delphi-Quellcode:

while (wurf<>6) do
      begin
        wurf:=random(6)+1;
        Writeln('Dein Wurf war: ',wurf);
        spielstand:=spielstand+wurf;
        writeln('Dein aktueller Spielstand lautet: ',spielstand,', Weitermachen? "J" oder "N"');
        readln(e);
        if e=N then
        writeln('Dein aktueller Punktestand lautet: ',spielstand);
        if wurf=6 then
        spielstand:=0;
        writeln('Du hast verloren dein Spielstand lautet: ',spielstand);
      end;
readln();
end.

Folgendes Problem:
Er erkennt das mit dem "J" und "N" nicht.
Wie geht das richtig?
Und wenn der Wurf 6 ist soll das spiel aufhören und nicht noch weiter addieren.

[LTE5]

Zitat:

if e=N then

Überlege mal, von welchem Datentyp deine Eingabe ist. Wie vergleicht man sowas dann?

Und das andere Problem. Such mal bei Google nach delphi cancel loop. Nicht aber blind kopieren, sondern lesen und lernen.
Und immer an begin end denken.

Beispiel

Delphi-Quellcode:

 // Pseudocode!
WENN keine = ahnung DANN
 X;
 Y;

Im obigen Beispiel würde, wenn WENN wahr ist, nur X ausgeführt werden.
So ist es richtig, wenn beide ausgeführt werden sollen

Delphi-Quellcode:

 // Pseudocode!
WENN keine = ahnung DANN
 BEGIN
  X;
  Y;
 END;

Deswegen ist eine ordentliche Formatierung Pflicht!
Hier im Forum gibt es übrigens Delphi-Tags.