Паскаль! дано число. умножить его на 9 (один раз). - вопрос №16598729 от али426 12.03.2021 08:23

Question

Информатика: Паскаль! дано число. умножить его на 9 (один раз). получить сумму его цифр. т.е. доказать, что сумма цифр этого числа будет равна 9. (в первом раскладе или во втором сумма цифр этого числа будет равна 9.)

али426 · Answer

vara,b:integer;beginreadln(a);a:=a*9;while a 9 dobegin   b:=0;  while a 0 do  begin    b:=b+a mod 10;    a:=a div 10;  end;  a:=b;end;end.  ...