Ввести целое число и найти сумму его цифр ( с выводом "Сумма цифр числа ", a ," равна ", b) кумир
Алг нач цел a,b,t ввод a t:=a; b:=0; нц пока t<>0 b:=b+mod(t,10); t:=div(t,10); кц вывод 'сумма цифр числа ',a,' равна ',b кон
Алг Число нач цел a, n, b вывод "Введите целое число", нс ввод a n:= a b:= 0 нц пока n<>0 b:= b+mod(n,10) n:= div(n,10) кц вывод "Сумма цифр числа ", a ," равна ", b кон
у вас ошибка в 9 строке
Да, спасибо. Ошибка (опечатка) исправлена.