Каковы преимущества расчета стоимости компьютера в интернете? ​

// PascalABC.NET 3.3
const n=7;
begin
  Writeln('Исходный массив:');
  var a:=MatrRandom(n,n,-10,10); a.Println(6);
  var q:=ReadInteger('q = ');
  var m:=a.ElementsByRow.Where(x->x=q).Count;
  if m>0 then writeln('YES') else writeln('NO');
end.

Пример:
Исходный массив:
     0    -1   -10     7     5     5     5
    -3     8     8    -8     4    10     0
    -2     9    -1    -4   -10    -2     2
    -9     6    10    -4     3    -5     4
    -3     9     4    -6     8    10    -2
     4    -1    -2     8     9    -8    -3
     5     6     2     5     9     3     8
q =  9
YES

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

begin
  Writeln('*** Исходный массив ***');
  var M:=MatrRandom(5,5,-5,99);
  M.Println(4); Writeln(4*M.ColCount*'-');
  var s:=M.ElementsByRow;
  Writeln('Максимальный элемент равен ',s.Max);
  if s.Any(t->t<0) then Writeln('Есть отрицательные элементы')
  else Writeln('Нет отрицательных элементов');
  var a:=ReadInteger('A =');
  if s.Any(t->t=a) then Writeln('Массив содержит число ',a)
  else Writeln('Массив не содержит число ',a)
end.

Пример работы
*** Исходный массив ***
  71  89  53  36  70
  71  -2  99  25  50
  18  49  71  31  37
  11  65  52  65  90
  64  10  30  67  23
--------------------
Максимальный элемент равен 99
Есть отрицательные элементы
A = 31
Массив содержит число 31