Измерительные методы оценки программ: назначение, условия применения​

Var   i, j, max, n, m: integer;     ar: array[,]of integer;   begin   readln(n, m);   setlength(ar, n, m);   for i : = 0 to n - 1 do       for j : = 0 to m - 1 do   ar[i, j] : = random(0, 100);   max : = ar[0, 0];   for i : = 0 to n - 1 do     begin     for j : = 0 to m - 1 do       begin       if(ar[i, j] > max) then max : = ar[i, j];     end;     end;   writeln('максимальный элемент: ', max);     for i : = 0 to n - 1 do       begin       for j : = 0 to m - 1 do write(ar[i, j]: 4, ' ');         writeln;       end;   end.

// pascalabc.net 3.2, сборка 1353 от 27.11.2016 // внимание! если программа не работает, обновите версию! begin   var a: =matrrandom(6,5,-50,50); a.println(4); writeln;   var res: =new int64[6];   for var i: =0 to 5 do       if i.iseven then           res[i]: =a.row(i).aggregate(int64(,y)-> x*y)       else           res[i]: =a.row(i).sum;   writeln('результаты: '); res.println(newline) end. пример   -32  22  12    8 -38   45  22 -12  26  -2   -46  12  19  42  -1   19    5  29 -41 -41   10 -23    2 -19  10   -4  22  15  34  34 результаты: 2568192 79 440496 -29 87400 101