1. Сформировать массив, используя только плложительные элементы двух заданных массивов длины N. 2. Умножить заданную матрицу р

Question

сможете решить? желательно на бейсике, но можно и питон

Answer 1

1.
for a=lbound(massiv1) to ubound(massiv1)
if massiv1(a) > 0 then
redim preserve total(ubound(total)+1)
total(ubound(total))= massiv1(a)
End if
next a
-//-'Тоже самое только massiv1 заменить на massiv2 таким образом пункт 1 будет выполнен.

2.
for a = lbound(total) to ubound(total)
total = total*p
next a