напишите, пожалуйста, программу в Кумир (Именно в Кумир.) для нахождения суммы цифр числа. Очень срочно((

алг
нач
цел a,sum
вывод 'введите число: '
ввод a
sum:=0;
нц пока a<>0
sum:=sum+mod(a,10)
a:=div(a,10)
кц
вывод 'сумма цифр: ',sum
кон