На языке паскаля 1дано целое число. если оно является положительным, то прибавить к нему 1; в противном случае не изменять его. вывести полученное число. 2дано целое число. если оно является положительным, то прибавить к нему 1; в противном случае вычесть из него 2. вывести полученное число.
mixrasp2002
3
07.09.2019 13:10
0
Другие вопросы по теме Информатика
wolf13131
03.12.2021 13:29
ольга1721
03.12.2021 13:30
kkira1
03.12.2021 13:31
dzavad1
20.04.2020 08:25
kurotetsu666
20.04.2020 08:25
hunateВадим2827854
20.04.2020 08:25
ФелаБульф12
20.04.2020 08:26
Убийца967
18.05.2020 11:16
Популярные вопросы
- Дополни недостающие слова: ... -это расстояние : на время. а) скорость....
2 - Какие из фигур являются четырёхугольниками: а) все углы прямые;б) есть...
3 - У яку тканину надходять продукти розщеплення жирів?А) у кров;Б) у лімфу;...
2 - будь ласка сюжет Остап Вишня Перший диктант...
2 - Нужно написать киноэтюд для поступления в колледж Сценарий киноэтюда...
1 - Цветок это орган А) вегетативный Б) Генеративный В) семенного размножения...
2 - Python Исправте ошибки number = float(input()) if number % 10 = 0:...
2 - Скільки коренів має рівняннях^4+3х^2+2=0...
2 - Какая самая большая страна в мире?...
2 - До ть будь ласка. На фото вправа 10. Треба перебудувати речення з...
2
Program prim1;
Var x:integer;
Begin
x:= какое число или присваивания оператором readln(x)
if x>0 then x+1
writeln ('Полученное число :,x');
end.
Вроде так