36

Дано целое число. Если оно является положительным…

pmarkovich 28 февраля 2023

Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае не изменятьего. Вывести полученноечисло.

категория: информатика

57

var i: Integer; begin Write ('Введите целое число: '); Readln (i); if i >=0 then inc (i); Writeln (i); end.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
farisey, 28 февраля 2023
Сложите числа 1000011101+101000010
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...