var x: integer;
begin
writeln('напишите число');
readln(x);
x:=x+2;
if x mod 2 = 1 then x:=x+1 ;
x:=x div 2;
writeln(x);
end.
