Есть ответ 👍

Если надо слева и справа страницы сделать ровными то выберают

279
416
Посмотреть ответы 2

Ответы на вопрос:


Агде

                                       PascalABC.NET

begin

 var a := ReadInteger('Введите число от 100 до 999 = ').Clamp(100,999);

 Print('ответ:',a div 100 + a mod 10 * 100 + a mod 100 div 10 * 10);

end.

Популярно: Информатика