Составить программу в вижуал бэйсик: 1) среди всех трехзначных положительных чисел выбрать и вывести на экран только кратные трем и подсчитать их количество. 2)найти произведение к членов последовательности: -1,3,

214

330

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

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

rubyrose2003

Информатика

4,4(21 оценок)

1. строка получается слишком длиной, поэтому разбиваем ее на две части sub z1() dim n as integer dim i as integer dim s1 as string dim s2 as string for i = 100 to 999 if i mod 3 = 0 then n = n + 1 if len(s1) < 1024 then s1 = s1 & i & " " else s2 = s2 & i & " " end if end if next i msgbox (s1) if len(s2) > 0 then msgbox ("продолжение: " & s2) msgbox ("их количетво: " & n) end sub1. вариант дла excel. срабатывает на двойном клике мышки. можешь приписать любому другому событиюprivate sub worksheet_beforedoubleclick(byval target as range, cancel as boolean)dim n as integerdim i as integerfor i = 100 to 999 if i mod 3 = 0 then n = n + 1 cells(n, 1) = i end ifnext imsgbox ("их количество: " & n)end sub2.sub z2()dim k as integerdim p as doublek = inputbox("введите k: ")p = 1 for i = 1 to k p = p * (-1 + 4 * (i - 1)) next i msgbox ("произведение: " & p) end sub

merkurevamilena1

Информатика

4,8(33 оценок)

1x 2b-3=1×x×2b-3 и наверное всё

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

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

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

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

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

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

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

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

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

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