Дана прямоугольная матрица размерности MxN A .Переписать - вопрос №14929090 от SemMandarenova 04.04.2021 21:37

Question

Информатика: Дана прямоугольная матрица размерности MxN A .Переписать элементы каждого столбца матрицы A в обратном порядке на том же месте (перевернуть каждый столбец матрицы A без использования дополнительного массива).

SemMandarenova · Answer

##var (m, n) := ReadInteger2;var a := MatrRandom(m, n, -99, 99);a.Println(4);Writeln;for var j := 0 to n - 1 do  for var i := 0 to (m - 1) div 2 do    Swap(a[i, j], a[m - i - 1, j]);a.Println(4)...