Question

Вот эту задачку на паскале, программа нужна. Двумерный массив.

Answer 1

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

begin
  var n:=ReadInteger('n=');
  var a:=MatrGen(n,n,(i,j)->i.IsEven?j+1:n-j); a.Println(3)
end.

Пример
n= 8
  1  2  3  4  5  6  7  8
  8  7  6  5  4  3  2  1
  1  2  3  4  5  6  7  8
  8  7  6  5  4  3  2  1
  1  2  3  4  5  6  7  8
  8  7  6  5  4  3  2  1
  1  2  3  4  5  6  7  8
  8  7  6  5  4  3  2  1

Answer 2

Если не трудно, можно старую программу массива? Учитель просто сразу заподозрит.

Answer 3

Я не понимаю термина "старая программа массива".

Answer 4

В упрощенном варианте, просто пример, который показывал преподаватель был точно не в 3 строчки. Именно это смущает.

Answer 5

Ну это проблема Вашего преподавателя и Вас, если Вас обучают по допотопной методике. Во многих школах уже учат писать именно так. Если Вам надо конкретный стиль программирования - указывайте в вопросе. А Вы даже версию Паскаля не указали!

Answer 6

К сожалению, я не успел посмотреть версию.