program program1
implicit none
integer :: i
i = 5
print *, i
print *, i+1
end program
