1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | CLS INPUT "inoput N ", N DIM B(N) AS INTEGER FOR i = 1 TO N STEP 2 j = j + 1 B(i) = j IF i < N THEN B(i + 1 ) = -j END IF NEXT i FOR i = 1 TO N PRINT B(i); NEXT i |