Сформируйте массив В(N) следующим образом: В(1)=-1 В(2)=1 В(3)=-2 В(4)=2 В(5)=-3 В(6)=3 В(7)=-4 — QBasic(Бейсик)

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