implicit none
integer::n
read(*,*) n
write(*,"(i0)") n-1
end