zadach173.BAS

{* Задача173 *}

REM basic

' Ввести Х. Если его значение четное или равное 0,
' то прибавить 2, если - нечетное, то прибавить 1.


CLS
INPUT "Введите X ", X
If X / 2 = X  2 Then X = X + 2
X = X + 1
PRINT "X = "; X
End