Найти в двумерном массиве целых чисел размером 3х4 номера отрицательных элементов...

// PascalABC.NET 3.2, сборка 1482 от 12.06.2017
// Внимание! Если программа не работает, обновите версию!

begin
Writeln('*** Исходный массив ***');
var a:=MatrRandom(3,4,-99,99);
a.Println(4); Writeln(4*a.ColCount*'-');
var s:=a.ElementsWithIndexes.Where(z->z[0]<0);<br> if s.Count=0 then Writeln('Нет отрицательных элементов')
else begin
    Write('Отрицательные элементы: ');
    s.Select(x->Format('a[{0},{1}]',x[1]+1,x[2]+1)).Println
    end
end.

Пример
*** Исходный массив ***
-62 13 -44 78
-19 73 92 -61
47 -13   3 43
----------------
Отрицательные элементы: a[1,1] a[1,3] a[2,1] a[2,4] a[3,2]