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

Ответы:
Коля Плехов
09-02-2017 10:34

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.  

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Паскаль! Дано число. Умножить его на 9 (один раз).  Получить сумму его цифр. Т.е. доказать, что сумма цифр этого числа будет равна 9. (В первом раскладе или во втором сумма цифр этого числа будет равна 9.) » от пользователя ЕВГЕНИЙ ПАВЛОВСКИЙ в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!