ll@n;
rep(k,2,62){
	ll f[128]{};
	f[k]=1;
	rep(i,k+1,128){
		rep(j,i-k,i){
			f[i]+=f[j];
		}
		if(f[i]==n){
			wt(k);
			exit(0);
		}
		if(f[i]>n){
			break;
		}
	}
}
wt(-1);