Delphi-Quellcode:
for i:=1 to 100 do
wurf:=random(6)+1;
if (wurf<5) then
spielstand:=spielstand+wurf
else
writeln('Du hast eine 6 gewuerfelt und Verloren! ');
writeln('Dein Spielstand ist: ',spielstand);
Das kann so nicht funktionieren. Da fehlen begin und end.
Bei ordentlicher Formatierung sieht man das.
Hier wird 100x wurf := verabeitet.