Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/15: Рейтинг темы: голосов - 15, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 18.09.2015
Сообщений: 41

Могут ли два идущих подряд билета оказаться несчастливыми?

23.12.2016, 19:07. Показов 3195. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Назовем автобусный билет несчастливым, если сумма цифр его шестизначного номера делится на 13. Могут ли два идущих подряд билета оказаться несчастливыми?
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
23.12.2016, 19:07
Ответы с готовыми решениями:

Могут ли два автобусных билета подряд быть удачными?
Назовем шестизначный автобусный билет удачным, если сумма его цифр делится на 7. Могут ли два билета подряд быть удачными?

Могут ли сума двух идущих подряд числа делиться на 13
Здравствуйте. Помогите пожалуйста решить задачу. Назовем автобусный билет несчастливым, если сумма цифр его шестизначного номера делится...

Имеются ли в последовательности два идущих подряд нулевых числа или три подряд одинаковых числа
44. Даны целые числа k, k,...,k (m=20). Имеются ли в последовательности два идущих подряд нулевых числа или три подряд одинаковых числа

3
 Аватар для XIST
1960 / 1070 / 148
Регистрация: 01.10.2009
Сообщений: 3,599
Записей в блоге: 1
23.12.2016, 20:02
могут
0
117 / 110 / 31
Регистрация: 05.04.2014
Сообщений: 224
23.12.2016, 21:15
Могут, например:
138999 - сумма = 39
139000 - сумма = 13
0
Заблокирован
23.12.2016, 22:29
Лучший ответ Сообщение было отмечено rapturesomfanya как решение

Решение

Ещё
048999 049000
057999 058000
066999 067000
075999 076000
084999 085000
093999 094000
138999 139000
147999 148000
156999 157000
165999 166000
174999 175000
183999 184000
192999 193000
228999 229000
237999 238000
246999 247000
255999 256000
264999 265000
273999 274000
282999 283000
291999 292000
318999 319000
327999 328000
336999 337000
345999 346000
354999 355000
363999 364000
372999 373000
381999 382000
390999 391000
408999 409000
417999 418000
426999 427000
435999 436000
444999 445000
453999 454000
462999 463000
471999 472000
480999 481000
507999 508000
516999 517000
525999 526000
534999 535000
543999 544000
552999 553000
561999 562000
570999 571000
606999 607000
615999 616000
624999 625000
633999 634000
642999 643000
651999 652000
660999 661000
705999 706000
714999 715000
723999 724000
732999 733000
741999 742000
750999 751000
804999 805000
813999 814000
822999 823000
831999 832000
840999 841000
898999 899000
903999 904000
912999 913000
921999 922000
930999 931000
988999 989000
997999 998000


Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
m = -1
For a = 0 To 9
For b = 0 To 9
For c = 0 To 9
For d = 0 To 9
For e = 0 To 9
For f = 0 To 9
  n = (a + b + c + d + e + f) Mod 13
  If n = 0 Then
    If m = 0 Then
      Debug.Print ((a & b & c & d & e & f) - 1 & "  " & a & b & c & d & e & f)
    End If
  End If
  m = n
Next
Next
Next
Next
Next
Next
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
23.12.2016, 22:29
Помогаю со студенческими работами здесь

Два подряд идущих элемента списка
Помогите написать предикат, которой для заданного числа и заданного числового списка проверяет, есть ли в списке два подряд идущих...

Определить два идущих подряд нулевых элемента
Помогите пожалуйста выяснить,имеется ли в массиве C (динамический) два идущих подряд нулевых элемента. Решить задачу ,используя указатели.

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

Определить, есть ли в списке два подряд идущих списка
Определить, есть ли в списке два подряд идущих списка.

Найти в массиве слов два нуля, идущих подряд
Задача такова: Знайти чи є в масиві два нулі, що йдуть підряд. Масив слів. Работаю в emu8086. Буду рад любым наброскам :)


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru