решить задачи на языке программирования Delphi. Задача 1. Задан массив A(N,N), заполненный целыми случайными числами из диапазона [-27;28]. Найти произведение ненулевых элементов массива.
Задача 2. Задан массив A(N), заполненный случайными целыми числами из диапазона [-18,24]. Составить программу нахождения третьего отрицательного элемента массива.