1d_array.bas

1 REM PRACE S JEDNOROZMERNYMI POLI
2 REM UPRAVA PRO TURBO BASIC
3 REM 
4 REM ----------------------------
5 REM 
10 DIM A(10)
20 FOR I=0 TO 10
30   A(I)=10*I
40 NEXT I
50 REM TISK POLE
60 FOR I=0 TO 10
70   PRINT A(I)
80 NEXT I
999 END