17 lines
263 B
Text
17 lines
263 B
Text
10 X=4 : Y=5
|
|
20 DIM A(X) : DIM B(Y) : DIM C(X+Y)
|
|
30 FOR I=1 TO X
|
|
40 : A(I) = I
|
|
50 NEXT
|
|
60 FOR I=1 TO Y
|
|
70 : B(I) = I*10
|
|
80 NEXT
|
|
90 FOR I=1 TO X
|
|
100 : C(I) = A(I)
|
|
110 NEXT
|
|
120 FOR I=1 TO Y
|
|
130 : C(X+I) = B(I)
|
|
140 NEXT
|
|
150 FOR I=1 TO X+Y
|
|
160 : PRINT C(I);
|
|
170 NEXT
|