Ответы на вопрос:
Вставка - звук. там выбираешь звуковой файл, а дальше, когда будешь скидывать презентацию на флешку, этот звуковой файл желательно скидывать вместе с презентацией в папке.
Dim msg as stringdim x as integer for x = 100 to 999 if ((cint(mid(cstr(x), 1, 1)) + cint(mid(cstr(x), 2, 1)) + cint(mid(cstr(x), 3, * 3) mod 13 = 0 then msg = msg & "утроенная сумма цифр равная " & ((cint(mid(cstr(x), 1, 1)) + cint(mid(cstr(x), 2, 1)) + cint(mid(cstr(x), 3, * 3) & ", числа " & x & ", кратна 13" & vbcrlf end if next ' c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535 msgbox(msg)утроенная сумма цифр равная 39, числа 139, кратна 13утроенная сумма цифр равная 39, числа 148, кратна 13утроенная сумма цифр равная 39, числа 157, кратна 13утроенная сумма цифр равная 39, числа 166, кратна 13утроенная сумма цифр равная 39, числа 175, кратна 13утроенная сумма цифр равная 39, числа 184, кратна 13утроенная сумма цифр равная 39, числа 193, кратна 13утроенная сумма цифр равная 39, числа 229, кратна 13утроенная сумма цифр равная 39, числа 238, кратна 13утроенная сумма цифр равная 39, числа 247, кратна 13утроенная сумма цифр равная 39, числа 256, кратна 13утроенная сумма цифр равная 39, числа 265, кратна 13утроенная сумма цифр равная 39, числа 274, кратна 13утроенная сумма цифр равная 39, числа 283, кратна 13утроенная сумма цифр равная 39, числа 292, кратна 13утроенная сумма цифр равная 39, числа 319, кратна 13утроенная сумма цифр равная 39, числа 328, кратна 13утроенная сумма цифр равная 39, числа 337, кратна 13утроенная сумма цифр равная 39, числа 346, кратна 13утроенная сумма цифр равная 39, числа 355, кратна 13утроенная сумма цифр равная 39, числа 364, кратна 13утроенная сумма цифр равная 39, числа 373, кратна 13утроенная сумма цифр равная 39, числа 382, кратна 13утроенная сумма цифр равная 39, числа 391, кратна 13утроенная сумма цифр равная 39, числа 409, кратна 13утроенная сумма цифр равная 39, числа 418, кратна 13утроенная сумма цифр равная 39, числа 427, кратна 13утроенная сумма цифр равная 39, числа 436, кратна 13утроенная сумма цифр равная 39, числа 445, кратна 13утроенная сумма цифр равная 39, числа 454, кратна 13утроенная сумма цифр равная 39, числа 463, кратна 13утроенная сумма цифр равная 39, числа 472, кратна 13утроенная сумма цифр равная 39, числа 481, кратна 13утроенная сумма цифр равная 39, числа 490, кратна 13утроенная сумма цифр равная 39, числа 508, кратна 13утроенная сумма цифр равная 39, числа 517, кратна 13утроенная сумма цифр равная 39, числа 526, кратна 13утроенная сумма цифр равная 39, числа 535, кратна 13утроенная сумма цифр равная 39, числа 544, кратна 13утроенная сумма цифр равная 39, числа 553, кратна 13утроенная сумма цифр равная 39, числа 562, кратна 13утроенная сумма цифр равная 39, числа 571, кратна 13утроенная сумма цифр равная 39, числа 580, кратна 13утроенная сумма цифр равная 39, числа 607, кратна 13утроенная сумма цифр равная 39, числа 616, кратна 13утроенная сумма цифр равная 39, числа 625, кратна 13утроенная сумма цифр равная 39, числа 634, кратна 13утроенная сумма цифр равная 39, числа 643, кратна 13утроенная сумма цифр равная 39, числа 652, кратна 13утроенная сумма цифр равная 39, числа 661, кратна 13утроенная сумма цифр равная 39, числа 670, кратна 13утроенная сумма цифр равная 39, числа 706, кратна 13утроенная сумма цифр равная 39, числа 715, кратна 13утроенная сумма цифр равная 39, числа 724, кратна 13утроенная сумма цифр равная 39, числа 733, кратна 13утроенная сумма цифр равная 39, числа 742, кратна 13утроенная сумма цифр равная 39, числа 751, кратна 13утроенная сумма цифр равная 39, числа 760, кратна 13утроенная сумма цифр равная 39, числа 805, кратна 13утроенная сумма цифр равная 39, числа 814, кратна 13утроенная сумма цифр равная 39, числа 823, кратна 13утроенная сумма цифр равная 39, числа 832, кратна 13утроенная сумма цифр равная 39, числа 841, кратна 13утроенная сумма цифр равная 39, числа 850, кратна 13утроенная сумма цифр равная 78, числа 899, кратна 13утроенная сумма цифр равная 39, числа 904, кратна 13утроенная сумма цифр равная 39, числа 913, кратна 13утроенная сумма цифр равная 39, числа 922, кратна 13утроенная сумма цифр равная 39, числа 931, кратна 13утроенная сумма цифр равная 39, числа 940, кратна 13утроенная сумма цифр равная 78, числа 989, кратна 13утроенная сумма цифр равная 78, числа 998, кратна 13
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Daleton17.08.2022 18:43
-
Ьала19.04.2021 21:48
-
angelinashushi14.12.2020 14:43
-
alexc12324.02.2023 06:02
-
fluffnastya28.01.2023 05:04
-
vugarjalilovp0ci9p24.10.2022 17:46
-
Vika1002306.02.2022 09:23
-
Дима6u943229.07.2022 04:11
-
SweetLOL18.09.2021 12:07
-
yanazaharova9610.12.2022 03:17
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.