С! кто понимает? нужно преобразовать массив.(написать программу на паскале) дан целочисленный двумерный массив. 1. удалить те строки, в которых встречаются нулевые элементы. 2. отсортировать элементы первого столбца по возрастанию. 3. в последним столбце прибавить число b ко всем элементам после k-го элемента (b и k ввести с клавиатуры). под удалением понимать исключение этого элемента путем смещения всех следующих за ним влево на 1 позицию и присвоение последнему элементу значения 0. для отладки программы числа матрицы сформировать с генератора случайных чисел.
189
248
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1425 от 22.04.2017 // внимание! если программа не работает, обновите версию! begin var n: =readinteger('количество строк в матрице: '); var m: =readinteger('количество столбцов в матрице: '); writeln('*** исходная матрица [',n,',',m,'] ***'); var a: =matrrandom(n,m,-9,9); a.println(3); writeln(3*a.colcount*'-'); // 1. удалить строки с нулевыми элементами var v: =a.rows.select(x-> x.all(y-> y< > ; var q: =new integer[v.where(r-> r=true).count,a.colcount]; var k: =0; for var i: =0 to v.count-1 do if v[i] then begin q.setrow(k,a.row(i)); k+=1 end; writeln('матрица, не содержащая строк с нулями'); a: =copy(q); a.println(3); // 2. отсортировать элементы первого столбца по возрастанию a.setcol(0,a.col(0).orderby(x-> x).toarray); writeln('матрица с отсортированной колонкой 1'); a.println(3); // 3. игры с k и b var b: integer; write('введите значения b и 1< =k< =',a.rowcount,': '); read(b,k); for var j: =k to a.rowcount-1 do a[j,m-1]+=b; writeln('матрица с модифицированной последней колонкой'); a.println(3) end. пример количество строк в матрице: 5 количество столбцов в матрице: 8 *** исходная матрица [5,8] *** -4 -8 4 -4 8 -6 5 -2 2 -7 -4 6 8 4 9 -8 0 -8 -4 -7 -4 -7 6 -3 6 -4 -8 9 -7 -5 -3 -2 -9 7 -1 -2 -9 9 7 4 матрица, не содержащая строк с нулями -4 -8 4 -4 8 -6 5 -2 2 -7 -4 6 8 4 9 -8 6 -4 -8 9 -7 -5 -3 -2 -9 7 -1 -2 -9 9 7 4 матрица с отсортированной колонкой 1 -9 -8 4 -4 8 -6 5 -2 -4 -7 -4 6 8 4 9 -8 2 -4 -8 9 -7 -5 -3 -2 6 7 -1 -2 -9 9 7 4 введите значения b и 1< =k< =4: 5 2 матрица с модифицированной последней колонкой -9 -8 4 -4 8 -6 5 -2 -4 -7 -4 6 8 4 9 -8 2 -4 -8 9 -7 -5 -3 3 6 7 -1 -2 -9 9 7 9 замечание: под удалением без всяких условностей понимается именно удаление. матрица после удаления просто содержит меньшее количество строк.
Популярно: Информатика
-
Crazs22.03.2021 15:38
-
sorrypepemain27.04.2021 05:32
-
Olena001229.05.2023 14:26
-
КарКарыч666603.04.2023 20:51
-
YULIAJUICE18.11.2021 20:20
-
nastyaparshincg11.03.2022 00:25
-
12654321ььь21.12.2021 19:26
-
Даша170715.03.2021 06:55
-
mnmnho5730.07.2020 16:21
-
drus907022.02.2021 03:17