Чему равна сумма цифр числа - VB
Формулировка задачи:
В программу вводится натуральное число n (n >= 100).
Определить: чему равна сумма его цифр.
Решение задачи: «Чему равна сумма цифр числа»
textual
Листинг программы
- 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
