1 / 0 / 0
Регистрация: 17.10.2012
Сообщений: 15

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

27.10.2012, 20:22. Показов 1304. Ответов 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,907
27.10.2012, 20:33
Вычислить, чему равна сумма цифр числа
0
Супер-модератор
Эксперт функциональных языков программированияЭксперт Python
 Аватар для Catstail
38195 / 21128 / 4309
Регистрация: 12.02.2012
Сообщений: 34,733
Записей в блоге: 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
Ответ Создать тему
Опции темы

Новые блоги и статьи
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при создании или изменении элементов справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru