Дано произвольное число к если оно положительное то уменьшить на 6. в противном случае увеличить на 10
213
425
Ответы на вопрос:
Program primer1; var k: integer; begin writeln('введите k'); readln(k); if k> 0 then k: = k-6 else k: = k+10; write(k); end.
Var x,i: integer; begin read(x); for i: =1 to x do if x mod i =0 then write(i,' '); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
muravyov191013.09.2022 04:19
-
Леля2457928.06.2020 08:22
-
Ch3l0vek08.03.2021 14:36
-
miroslavavernep09sr923.11.2022 07:41
-
AsassinGirl12.06.2021 22:49
-
egorageev0715.12.2020 15:50
-
ладаседан722.08.2020 21:18
-
Cr4zyvlad30.07.2021 20:00
-
Кисулятв05.09.2021 09:55
-
kakashka56429.05.2022 01:06
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.