Есть ответ 👍

Заполнить массив v(7,7) целыми случайными числами из интервала [-15,15]. распечатать его. - найти произведение элементов третьей строки и количество элементов больших, этого произведения - найти и распечатать максимум в 3 столбце массива.

184
321
Посмотреть ответы 3

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


// pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! begin   writeln('*** исходный массив ***');   var v: =matrrandom(7,7,-15,15);   v.println(4); writeln(4*v.colcount*'-');   var pr3: =v.row(2).aggregate(1,(x,y)-> x*y);   writeln('произведение элементов 3-й строки равно ',pr3);   writeln('количество элементов, больших этого произведения, равно ',           v.elementsbyrow.where(t-> t> pr3).count);   writeln('максимум в 3-м столбце равен ',v.col(2).max) end. пример *** исходный массив ***   -4 -12 -15  -2  13    3 -15   -7  -1 -15    2  -2    4  -6   14    5    5  15  -4    3    0   13  15    9  14  11  -9  11     1  14  14    1  -4  -1  -7   15 -10 -13  -3  -8 -12  11     0 -13  -8    4    6    1 -11 произведение элементов 3-й строки равно 0 количество элементов, больших этого произведения, равно 24 максимум в 3-м столбце равен 14

// pascalabc.net 3.3, сборка 1576 от 16.11.2017 // внимание! если программа не работает, обновите версию! begin var v: =matrrandom(7,7,-15,15); v.println; var com: = v.row(2).aggregate(biginteger(,y)-> (x*y)); writeln('произведение эл-в 3ей строки = ', com); var cnt : = 0; foreach var x in v.row(2) do   if x > com then inc(cnt); writeln('количество элементов, больших чем это произведение = ', cnt); writeln('максимальный элемент 3го столбца = ', v.col(2).max); end. пример:       2  -4 -15  10  -1    2    6   15  -8  11    5  14  10  15     0  15 -10  13  -8 -13  14   14    6  13 -10    9    6 -12   -14    1    8  -9    1 -12  12   15    9  10  -7 -14    6  -3     9    9  -1 -14    1    1    3 произведение эл-в 3ей строки  = 0 количество элементов, больших чем это произведение = 3 максимальный элемент 3го столбца = 13 *****правил*****

16кб = 16384 байт =  131072 бит

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

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

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

Caktus Image

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

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

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

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

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

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

Подпишись на наш телеграмм канал

GTP TOP NEWS