Два одномерных массива, содержащие m и n элементов соответственно, заполнены произвольными целыми числами из диапазонов [-3; 2] и [-2; 3] соответственно. определить произведения положительных элементов массивов. использовать процедуры и функции. pascal