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

Question

Информатика

Варламий

20 марта, 00:13

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

+3

Ответы (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

кон