Pascal сумма цифр числа