Заполните матрицу, содержащую N строк и M столбцов.
1 6 7 12
2 5 8 11
3 4 9 10
заполнять по системе "змейкой" от 1 до N*M 

нет,спасибо

Ну и славно

Введите 30х30 и наслаждайтесь картинкой

Если будут 4-х значные числа, в Println(4) увеличьте параметр до 5

хорошо)

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018Внимание! Если программа не работает, обновите версию!begin  var (n,m):=ReadInteger2('Количество строк и столбцов в матрице:');  var a:=new integer[n,m];  for var j:=0 to m-1 do    if j.IsEven then a.SetCol(j,Range(n*j+1,n*(j+1)).ToArray)    else a.SetCol(j,Range(n*(j+1),n*j+1,-1).ToArray);  a.Println(4)end.ПримерКоличество строк и столбцов в матрице: 3 4   1   6   7  12   2   5   8  11   3   4   9  10