Дано массивы А1 (N1, M1), A2 (N2, M2), A3 (N3, M3). Сформировать одномерные массивы В1,

В2, В3, каждый из которых состоит из 2-ух элементов. В первом из них количество положительных элементов массивов А1, А2, А3 соответственно, во

втором количество отрицательных элементов массивов А1, А2, А3 соответственно. Определение

количества отрицательных и положительных элементов в исходном массиве и

формирование одномерного массива осуществить в подпрограмме.

Язык не указан, поэтому запишу на универсальном языке. Потом просто подставите в свой язык.

x = длинна массива A1

y = длинна массива A2

z = длинна массива A3

цикл i от 0 до x:

если i<=0:

B1[0] = B1[0] + 1

иначе:

B1[1] = B1[1] + 1

цикл i от 0 до y:

если i<=0:

B2[0] = B2[0] + 1

иначе:

B2[1] = B2[1] + 1

цикл i от 0 до z:

если i<=0:

B3[0] = B3[0] + 1

иначе:

B3[1] = B3[1] + 1

Вот и все.

Можно было объединить эти 3 цикла в один двойной цикл, однако это работает не во всех языках.