program main implicit none integer::N read*,N if(mod(N,2).eq.1) then N = N + 1 endif print '(i0)',N end program main