Паскаль, составьте программу для двумерного массива: Найти произведение отрицательных элементов указанной строки двумерного массива размером 4*5 целых чисел.
For i := 1 to 4 do for j := 1 to 5 do if (a[ i, j ] < 0) then m := m * a[ i,j ];