Turbo Toolbox/Turbo_Toolbox.iso/spezial/20/win_txl/beispiel/while1.txl

Text File | 1991-01-08 | 168 b | 13 lines

005 cls;
010 let b=0;
012 while b<3;
014 let a=0;
020 while a<4;
030 print "Wert von a ist ",a;
040 let a=a+1;
050 wend;
060 let b=b+1;
070 wend;
080 end;