Информатика: ПРОГРАММИРОВАНИЕ! ХЕЛП!

prosto12421

25.06.2020 16:35

Информатика

Есть ответ 👍

ПРОГРАММИРОВАНИЕ! ХЕЛП!

188

384

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

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

svettapan

Информатика

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

// pascalabc.net 3.2, сборка 1363 от 17.12.2016 // внимание! если программа не работает, обновите версию! begin var m: =readinteger('количество строк в матрице: '); var n: =readinteger('количество столбцов в матрице: '); writeln('*** исходная матрица [',m,'x',n,'] ***'); var a: =matrrandom(m,n,-50,50); a.println(4); writeln(4*a.colcount*'-'); var q: =a.cols.select(x-> x.first< x.last).toarray; var k: =q.where(r-> r).count; writeln('*** результирующая матрица [',m,'x',k,'] ***'); var b: =matrfill(m,k,0); var l: =0; for var j: =0 to n-1 do if q[j] then begin for var i: =0 to m-1 do b[i,l]: =a[i,j]; l+=1 end; b.println(4) end. пример количество строк в матрице: 5 количество столбцов в матрице: 8 *** исходная матрица [5x8] *** 15 -35 -11 -18 49 -32 31 -47 -21 -46 7 -48 3 24 -48 5 28 -46 36 -9 17 -32 -44 -10 -16 7 -14 40 13 30 50 -28 -8 35 -49 47 -31 30 18 20 *** результирующая матрица [5x4] *** -35 -18 -32 -47 -46 -48 24 5 -46 -9 -32 -10 7 40 30 -28 35 47 30 20

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

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

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

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

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

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

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

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

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

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