Из заданного числа вычли сумму его цифр. Из результата вновь вычли сумму его цифр и т.д. Через сколько таких действий получится ноль? Pascal-Паскаль

Из заданного числа вычли сумму его цифр. Из результата вновь вычли сумму его цифр и т.д. Через сколько таких действий получится ноль?

Входные данные

N - целого типа (само число).

Выходные данные

Возвращет число целого типа (количество действий).