1) Пусть дано целое число i. Требуется оставить его без изменения, если оно делится на 2, и вычесть из него 1, если это не так
на каком языке программирования?
ПАСКАЛЬ
вроде написал на Паскале
Var i: integer; begin readln(i); if i mod 2 = 0 then writeln(i); else writeln(i-1); end