Дано целое число N(>0). Используя операции деления нацело и взятие остатка  от деления найти количество и сумму его цифр.      

Есть ответ
18.12.2022
210

Ответ


var n,count,sum:integer;

 

begin

   read(n);

   count:=0;

   sum:=0;

   while (n0) do

      inc(count);

      sum:=sum+(n mod 10);

      n:=n div 10;

   end

end.

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.