Найдите все двузначные числа, сумма цифр которых не меняется при умножении числа на 2,3,4,5,6,7,8 и 9. нужно нарисовать алгоритм (блок-схему) и написать программу в visual basic-e. или хотя бы что-то из этого, .

224

387

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

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

serg6205

Информатика

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

Function ds(byval n as integer) as integer 'сумма цифр в числе n dim s as integer s = 0 do while n < > 0 s = s + n mod 10 n = int(n / 10) loop ds = s end function function isgood(n as integer) as boolean 'сохраняется ли сумма цифр при умножении числа на 2, ? dim etalon as integer, k as integer etalon = ds(n) isgood = true k = 2 do while isgood and k < 10 isgood = (ds(n * k) = etalon) k = k + 1 loop end function sub aaa() dim i as integer, s as string s = "" for i = 10 to 99 if isgood(i) then s = s + str(i) next i msgbox s end sub тестовое решение: 18 45 90 99

belanvlabimir

Информатика

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

Один символ содержит 49152 бита(это 6 кбайт)/6144=8 бит. следовательно мощность алфавита=2 в степени8=256 символов

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

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

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

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

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

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

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

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

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

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