Вматрице с(5,6) найти значение и индексы минимального элемента матрицы и количество положительных элементов.
202
373
Ответы на вопрос:
'vbscript sub zadanie() redim c(5, 6) k_pos = 0 mini = lbound(c, 1) minj = lbound(c, 2) for i = lbound(c, 1) to ubound(c, 1) for j = lbound(c, 2) to ubound(c, 2) c(i, j) = round(rnd * 10) if c(i, j) > 0 then k_pos = k_pos + 1 if c(i, j) < c(mini, minj) then mini = i minj = j end if next next msgbox "min c(" & mini & ", " & minj & ")=" & c(mini, minj) & vbnewline & "c> 0: " & k_pos end sub call zadanie()
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
yana102810.12.2020 01:29
-
natalyakazarya17.11.2021 17:19
-
KopolbEnufaHtuy30.01.2023 19:39
-
sasapanskov08.06.2020 21:48
-
прп3018.02.2022 01:47
-
anel1999923.05.2022 01:18
-
KrIs1girl05.08.2021 06:52
-
Polina2100Kaddik24.02.2020 10:07
-
pups22316.12.2020 11:36
-
jutyra01.08.2021 07:32
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.