Дано целое число. если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 2; если нулевым, то заменить его на 10. вывести полученное число.
162
482
Ответы на вопрос:
Как я понял, тебе нужно составить программку, я сделал на паскале var a: integer; begin read (a); if a> 0 then a: =a+1; if a< 0 then a: =a-2; if a=0 then a: =10; write(a); end.
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.
Популярно: Информатика
-
lainzord28.09.2020 05:44
-
Yablochkho24.10.2022 00:28
-
ВикторияГога04.10.2021 18:31
-
rlicSosanex27.07.2020 14:20
-
grskdarina22.02.2021 02:39
-
Amilina1127.04.2023 08:15
-
msvichinevskay24.06.2022 21:19
-
20Lorans0304.07.2020 01:22
-
krikstoon102.03.2021 07:13
-
boda1323.06.2021 12:12