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

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

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

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

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

Question

Информатика

Марксина

9 мая, 17:53

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

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

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

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

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

+1

Ответы (1)

Знаешь ответ?

Карина · Answer 1

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.