[pascal] nekonecny cyklus

vama · Napísal **vama**: 02.04.2010 13:09

Ako sa da elegantne vytvorit nekonecny cyklus v PASCALi ?
Dalo by sa to nejako podobne ako v C-cku:

Kód:

for( ; ; )
{
prikaz;
} 

Viem, ze by sa to dalo pomocou GOTO, ale to radsej nepouzivam a viem, ze by sa to dalo na nejaky takyto styl:

Kód:

var
 i: byte;

begin
 i := 0;
 while i < 5 do
 prikaz;

 readln;
end.

Ale, to nie je moc elegantne

. Da sa to nejako inak vyriesit v PASCALi ?

dEVIANT · Napísal **dEVIANT**: 02.04.2010 13:15

Naj elegantnejšie by to bolo asi pomocou while tak ako si to ty písal...

i:=0
while i=0 do begin

end;

Ďuri · Napísal **Ďuri**: 02.04.2010 13:23

Alebo proste while true do.

vama · Napísal autor témy **vama**: 02.04.2010 13:24

No takto sa mi to paci

Kód:

while true do

Ze mi to nenapadlo :-D