program tenka1_2017_c
    use,intrinsic :: iso_fortran_env
    implicit none
    integer(int64):: n,a,b,c


    read*, n

    do a=1,3500
        do b=1,3500
            if (4*a*b-n*a-n*b <= 0) cycle
            if (mod(n*a*b, 4*a*b-n*a-n*b)==0) then
                c = (n*a*b)/(4*a*b-n*a-n*b)
                print'(*(i0,1x))', a,b,c
                stop
            end if
        end do
    end do
end program tenka1_2017_c