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

0 голосов
72 просмотров

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

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

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

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


Информатика | 72 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var n: int64;
 function f(n: int64): int64;
begin
  if(n > 0) then f := f(n div 10) + (n mod 10);
end;
 begin
  readln(n);
write(f(n));
end.

(6.9k баллов)