Ввести целое число и найти сумму его цифр (с выводом "Сумма цифр числа ", a," равна ", b) кумир

Question

Информатика

Ефимий

12 сентября, 11:05

Ввести целое число и найти сумму его цифр (с выводом "Сумма цифр числа ", a," равна ", b) кумир

+1

Ответы (2)

Знаете ответ на вопрос?

Марюта · Answer 1

Алг

нач

цел a, b, t

ввод a

t:=a;

b:=0;

нц пока t0

b:=b+mod (t, 10) ;

t:=div (t, 10) ;

кц

вывод 'сумма цифр числа ', a,' равна ', b

кон

Зенона · Answer 2

Алг Число

нач

цел a, n, b

вывод "Введите целое число", нс

ввод a

n: = a

b: = 0

нц пока n0

b: = b+mod (n, 10)

n: = div (n, 10)

кц

вывод "Сумма цифр числа ", a," равна ", b

кон