Задано натуральное число n<10000 - VB
Формулировка задачи:
Задано натуральное число n<10000. Найти сумму цифр этого числа
Решение задачи: «Задано натуральное число n<10000»
textual
Листинг программы
- Function SumDig(n as integer) as integer
- If n < 10 then
- SumDig=n
- else
- SumDig=(n mod 10)+SumDig(n \ 10)
- end if
- End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д