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

Чему равна сумма цифр числа

27.10.2012, 20:22. Показов 1289. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
В программу вводится натуральное число n (n >= 100).
Определить: чему равна сумма его цифр.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
27.10.2012, 20:22
Ответы с готовыми решениями:

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

Найти все трехзначные числа, сумма цифр которых равна данному числу
найти все трехзначные числа, сумма цифр равно данному целому числу.Visual Basic

Найти все трехзначные числа, сумма цифр которых равна заданному целому числу
Пожалуйста, помогите сделать! (visual basic) Найти все трехзначные числа, сумма цифр которых равна заданному целому числу

4
 Аватар для Апострофф
9908 / 3924 / 742
Регистрация: 11.10.2011
Сообщений: 5,905
27.10.2012, 20:33
Вычислить, чему равна сумма цифр числа
0
Супер-модератор
Эксперт функциональных языков программированияЭксперт Python
 Аватар для Catstail
38193 / 21126 / 4309
Регистрация: 12.02.2012
Сообщений: 34,732
Записей в блоге: 14
27.10.2012, 21:05
Лучший ответ Сообщение было отмечено как решение

Решение

В 1001-й раз повторим:

Visual Basic
1
2
3
4
5
6
7
8
9
Function sumDig(n as integer) As integer
    if n < 0 then 
       sumDig=sumDig(abs(n))
    elseif n < 10 then
       sumDig=n
    else
       sumDig=(n mod 10)+sumDig(n \ 10)
    end if 
End function
3
1 / 0 / 0
Регистрация: 17.10.2012
Сообщений: 15
02.11.2012, 00:07  [ТС]
сделал сам, всё получилось....всё равно спасибо!
0
15155 / 6428 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
02.11.2012, 13:49
Добавил экзотики в ту тему
Вычислить, чему равна сумма цифр числа
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
02.11.2012, 13:49
Помогаю со студенческими работами здесь

Найти количество четырехзначных чисел, сумма цифр которых равна 9
Найти кол-во четырехзначных чисел, сумма цифр которых равна 9

Для всех чисел от 0 до 99 (целых) выбрать и вывести на экран такие, сумма цифр которых равна заданному
2. Для всех чисел от 0 до 99 (целых) выбрать и вывести на экран такие, сумма цифр которых равна заданному числу.

Для всех чисел от 0 до 99 (целых) выбрать и вывести на экран такие, сумма цифр которых равна заданному числу.
Заранее спасибо!

Найти все целые двузначные числа, разность цифр которых равна 3
В visual basic найти все целые двузначные числа, разность цифр которых равна 3.

Процедуры: на заданном отрезке найти все натуральные числа, сумма цифр которых при умножении числа на a не изменится
На отрезке найти все натуральные числа, сумма цифр которых при умножении числа на a не изменится.


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Программный отбор элементов справочника Номенклатура по группе 1С
Maks 22.03.2026
Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор под наименованию группы (на. . .
Как я обхитрил таблицу Word
Alexander-7 21.03.2026
Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a
AmbA 21.03.2026
без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
Программный отбор элементов справочника Сотрудники по перечислениям 1С
Maks 21.03.2026
Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
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),. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru