Язык Pаscal. Сформировать случайным образом массив В [7,7] из значений в диапазоне от -10 до 20. Найти произведение не равных нулю элементов каждого столбце массива. Поместить произведение в массив Y. Найти максимальное значение массива Y. Вывести на экран массивы В, Y и максимальное значение.