Написать программу нахождения суммы цифр вводимого с клавиатуры натурального трёхзначного числа(кумир)

алг

нач

цел а,с

ввод(а)

с:=0

нц

  с:=с+mod(а,10)

  а:=div(а,10)

  если а = 0 то выход все

кц

вывод с

кон

алг

нач

цел с, ч

вывод "Введите натуральное трёхзначное число:", нс

вывод "ч= "

ввод ч

с := div (ч, 100) + div (mod (ч, 100), 10) + mod (ч, 10)

вывод "Сумма цифр= ", с

кон