A composite of certain-sized primes

In Pari/gp

fp(upmax)=while(1,x=random(upmax);if(isprime(x),break));return(x)

a=1;for(i=1,40,a=a*fp(10^14));a