Дано целое число. если оно является положительным, то прибавить к нему 1; в противном случае не изменятьего. вывести полученное число.
186
488
Ответы на вопрос:
var i : integer; begin
write('введите целое число: '); readln(i);
if i > = 0 then inc(i);
writeln(i);
end.
Shareware или шароварная прога означает, что это не полностью бесплатная программа, а имеет или ограниченный срок бесплатного использования (демонстрационная версия), или не все функции программы доступны в бесплатной версии
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kazakstanarmy09.09.2022 18:34
-
снежок34505.07.2021 12:24
-
olegiwanow21.04.2022 08:23
-
madara01426.12.2020 23:53
-
checknutaya08.08.2020 05:40
-
Leafyllall27.03.2020 19:43
-
оля2710200020.06.2020 10:24
-
avatarmeri1514.12.2022 01:10
-
Лизотикенотик14.11.2022 23:52
-
Marina583945859328.04.2021 02:11
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.