Ребята, срочно помогите! завтра уже надо сдать!! программа на Basic!r /> из элементного массива А(20) сформируйте массив В, элементы которой по модулю больше некоторого значения С. ([A(1)]>C) надо программу и результат.заранее спасибо!

большое спасибо!))

пожалуйста)

CONST n = 20DIM a(1 TO n) AS INTEGER, b(1 TO n) AS INTEGERDIM c AS INTEGER, i AS INTEGER, j AS INTEGERCLSINPUT "Введите C: ", cRANDOMIZE TIMERPRINT "Массив А"j = 0FOR i = 1 TO n   a(i) = INT(3 * c * RND) + 1   PRINT a(i);   IF a(i) > c THEN      j = j + 1: b(j) = a(i)   END IFNEXT iPRINTPRINT "Массив B"FOR i = 1 TO j   PRINT b(i);NEXT iТестовое решение:Введите C: 4Массив А 7  2  6  11  10  9  2  1  7  4  6  1  8  5  12  4  11  2  6  2Массив B 7  6  11  10  9  7  6  8  5  12  11  6