Регистрация
Войти
Стать экспертом Правила
Информатика

Напишите рекурсивную функцию вычисления суммы цифр натурального числа.

Формат входных данных

На вход ваша программа получает одно натуральное число n (n<216)(n<216).
Формат выходных данных

Выведите одно число — сумму цифр числа n.

ОТВЕТЫ
Var n: int64;
 function f(n: int64): int64;
begin
  if(n gt; 0) then f := f(n div 10) + (n mod 10);
end;
 begin
  readln(n);
write(f(n));
end.
44
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам