Zitat von
axelf98:
Versuch dann mal das hier:
(Irgendwas war mit der Abbruchbedingung nicht in Ordnung...)
Delphi-Quellcode:
while true do
begin
if h > 20 then
x:=random(123)
else
x:=random(111);
inc(x);
if (x > 69) OR (x < 61) then break;
end;
Hab noch mal nachgedacht.. Einmal zuviel
Gruss