В квадратной матрице размером N поменять местами элементы на главной и побочной диагоналях в каждой строке

@Khizhnjak · Регистрация: 15.12.2016

1) В квадратной матрице размером N поменять местами элементы на главной и побочной диагоналях в каждой строке. Nвводится с клавиатуры. На экран выводится матрица в начальном состоянии, матрица после выполнения перестановок.
Было:
1 2 3 4
5 6 7 8
9 10 11 12
13 14 15 16
Стало:
4 2 3 1
5 7 6 8
9 11 10 12
16 14 15 13

@Hitoku · 11.05.2017, 03:33

Pascal

begin
  var n := ReadlnInteger('N =');
  var a := MatrRandom(n, n, 0, 10);
  writeln('Исходная матрица:'); a.Println;
  for var i := 0 to a.GetLength(0) - 1 do Swap(a[i, i], a[i, n - i - 1]);
  writeln('Результат: '); a.Println;
end.

@Khizhnjak 0 / 0 / 0 Регистрация: 15.12.2016 Сообщений: 20
		1
	В квадратной матрице размером N поменять местами элементы на главной и побочной диагоналях в каждой строке 09.05.2017, 16:44. Показов 1340. Ответов 1 Метки 1 курс, задача, задача, информатика, с (Все метки) 1) В квадратной матрице размером N поменять местами элементы на главной и побочной диагоналях в каждой строке. Nвводится с клавиатуры. На экран выводится матрица в начальном состоянии, матрица после выполнения перестановок. Было: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 Стало: 4 2 3 1 5 7 6 8 9 11 10 12 16 14 15 13 __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

В квадратной матрице размером N поменять местами элементы на главной и побочной диагоналях в каждой строке

Решение