Вмассиве из 10 чисел переставить все нули в конец массива , не меняя порядок не нулевых элементов pascal
190
190
Ответы на вопрос:
// pascalabc.net 3.3, сборка 1541 от 29.09.2017 // внимание! если программа не работает, обновите версию! begin writeln('*** исходная матрица ***'); var a: =matrrandom(6,7,-99,99); a.println(4); writeln(4*a.colcount*'-'); for var i: =0 to a.rowcount-1 do for var j: =0 to a.colcount-1 do if (a[i,j]> 0) and (i+j).iseven then a[i,j]: =0; writeln('*** результирующая матрица ***'); a.println(4) end. пример -74 73 61 97 96 52 -23 77 -99 -79 48 67 -3 -23 63 -61 -26 28 -99 89 -13 -85 43 -14 85 -8 91 -70 -68 90 71 -23 94 67 -81 -69 -52 44 47 96 -48 89 *** результирующая матрица *** -74 73 0 97 0 52 -23 77 -99 -79 0 67 -3 -23 0 -61 -26 28 -99 89 -13 -85 0 -14 0 -8 0 -70 -68 90 0 -23 0 67 -81 -69 -52 44 0 96 -48 89
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Vikasuk23.07.2020 05:26
-
кирилл243411.08.2021 11:58
-
ZiGZaG424224.03.2022 18:41
-
aamelkumova93331.05.2020 11:09
-
kvastalkerr12.02.2023 13:38
-
vhbhvgh07.05.2023 19:16
-
rustikkhusnutdi02.09.2022 01:22
-
dyganovanton19.11.2022 07:09
-
stas2030313.09.2021 20:50
-
lycena16.02.2021 16:20
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.