Паскаль! дано число. умножить его на 9 (один - вопрос №16598729 от Ипак44 27.12.2022 06:44

Question

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

Ипак44 · 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.  ...