n=eval *$<;z=65 f=->n,k{(1..k).sum{n+0*n/=2}} loop{f[x=(1..).bsearch{f[_1,z]>=n}||0,1+z-=1]==n&&p(x)+exit}