10 DIM ary(5) 20 FOR i=0 TO 4 30 ary(i)=i*1000 40 NEXT 50 FOR i=0 TO 4 60 PRINT i ary(i) 70 NEXT 80 SFTR ary(3) : 'rotate ary(0)~ary(3) 90 PRINT "SHOW SFTR" 100 FOR i=0 TO 4 110 PRINT i ary(i) 120 NEXT RUN
0 0 1 1000 2 2000 3 3000 4 4000 SHOW SFTR 0 3000 1 0 2 1000 3 2000 4 4000 |