ll@n,@l,@r,@a[n],z=1;
sortA(n,a);
rep(i,n-1){
	ll j=0;
	while(j<n-1&&!(a[i]*a[j]>=l&&a[i]*a[j]<=r&&a[j]*a[j+1]>=l&&a[j]*a[j+1]<=r)){
		++j;
	}
	if(j<n-1){
		ll k=j+1;
		while(k<n&&(a[i]*a[k]>=l&&a[i]*a[k]<=r&&a[k-1]*a[k]>=l&&a[k-1]*a[k]<=r)){
			++k;
		}
		z>?=k-j+(i<j-1||i>=k);
	}
}
wt(z);