ll@a,@b;wt(sum[x=a---b@isPrime(x)](x**3-x*x-~x));