Дано целое число если оно яв-ся полож. то прибавить 1. если отрицательным -2. если 0 то прибавить 10.
118
220
Ответы на вопрос:
var a : integer; begin readln (a); if a > 0 then a : = a +1; if a < 0 then a : = a-2 if a= 0 then a : = 10; writeln (a); end.
Популярно: Информатика
-
Military4730.04.2021 22:09
-
ayzhan197908.06.2021 16:00
-
petr0poroshenko03.12.2021 07:16
-
yayy6uytuy611.03.2020 20:46
-
dinara5643709.09.2022 04:04
-
Dronton22.12.2020 15:24
-
папа33615.12.2021 15:45
-
1DLove1101.12.2022 07:04
-
Инна079411.11.2020 02:31
-
shahmina12324.04.2022 08:50