Завтра уже надо программа на basic! r /> из элементного массива а(20) сформируйте массив в, элементы которой по модулю больше некоторого значения с. ([a(1)]> c) надо программу и результат.заранее !

281

354

Посмотреть ответы 2

Ответы на вопрос:

autist1707

Информатика

4,5(83 оценок)

Const n = 20 dim a(1 to n) as integer, b(1 to n) as integer dim c as integer, i as integer, j as integer cls input "введите c: ", c randomize timer print "массив а" j = 0 for 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 if next i print print "массив 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