Дана прямоугольная матрица размерности MxN A .Переписать - вопрос №14929767 от overlordcfg 03.08.2021 00:25

Question

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

overlordcfg · 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)...