Ответы на вопрос:
1)
var a, b, c, d: integer; begin readln(a); b : = a div 100; { сотни } c : = (a mod 100) div 10; { десятки } d : = a mod 10; { единицы } writeln('сумма цифр равна: ', b + c + d); end.
2)
var a, b, c, d, p: integer; begin readln(a); b : = a div 100; { сотни } c : = (a mod 100) div 10; { десятки } d : = a mod 10; { единицы } p : = d * 100 + c * 10 + b; writeln('наоборот: ', p); end.
3)
var a, b, c, d, e: integer; begin readln(a); e : = a div 1000; { тысячи } b : = (a div 100) mod 10; { сотни } c : = (a mod 100) div 10; { десятки } d : = a mod 10; { единицы } writeln('сумма: ', e + b + c + d); writeln('произведение: ', e * b * c * d); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Алгебра
-
nikitamakarov320.05.2022 19:47
-
Alex1t024.01.2021 14:34
-
полина212527.03.2022 11:11
-
merlinina7423.08.2020 16:47
-
10082003настя23.07.2022 13:41
-
RomcheG322829.11.2020 20:28
-
aruuuukaa1209.09.2021 17:40
-
rickieee17.06.2023 08:43
-
хочусдохнуть09.08.2020 16:19
-
SabrinaSirotina13.01.2023 17:03
![Caktus Image](/tpl/img/cactus.png)
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.