С! кто понимает? нужно преобразовать массив.(написать программу на паскале) дан целочисленный двумерный массив. 1. удалить те строки, в которых встречаются нулевые элементы. 2. отсортировать элементы первого столбца по возрастанию. 3. в последним столбце прибавить число b ко всем элементам после k-го элемента (b и k ввести с клавиатуры). под удалением понимать исключение этого элемента путем смещения всех следующих за ним влево на 1 позицию и присвоение последнему элементу значения 0. для отладки программы числа матрицы сформировать с генератора случайных чисел.

103

461

Посмотреть ответы 2

Ответы на вопрос:

frostywhite

Информатика

4,6(18 оценок)

// 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 замечание: под удалением без всяких условностей понимается именно удаление. матрица после удаления просто содержит меньшее количество строк.

jockman

Информатика

4,5(95 оценок)

// pascalabc.net 3.2, сборка 1389 от 01.03.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(readinteger('n=',99); a.println; var s: =a.where(x-> x> 0); writeln('длина отрезка равна ',s.max-s.min) end. пример n= 15 83 26 56 73 47 21 -8 91 72 7 60 12 25 36 62 длина отрезка равна 84

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.