program main implicit none integer::N,i read *,N do i=2,N-1 if(MOD(N,i).eq.0) then print '(i0," ",i0)',N/i,i return end if end do print '(i0," ",i0)',1,N end program main