Skip to main content
Code Golf

Return to Answer

deleted 105 characters in body
Source Link
ZaMoC
ZaMoC
  • 25.5k
  • 2
  • 32
  • 87

Wolfram Language (Mathematica), 14993 bytes

Times@@(Prime[Join[Range[(b=Floor@E)^(b+(a=x~D~x))+b+a],{(d=b^(b+b))-b-a},{d-a},{d+a},{d+b+b}]]^{d(b+a)-b,d+b+b,dFromDigits[LetterNumber/b+a,b^b+b,b,b+a,a,a,a,a,a,a,a,a,a})@Characters@"h h agdbdgideabhgehhfdeii difaga geg  egedcfh         "]

Try it online!Try it online!

Wolfram Language (Mathematica), 149 bytes

Times@@(Prime[Join[Range[(b=Floor@E)^(b+(a=x~D~x))+b+a],{(d=b^(b+b))-b-a},{d-a},{d+a},{d+b+b}]]^{d(b+a)-b,d+b+b,d/b+a,b^b+b,b,b+a,a,a,a,a,a,a,a,a,a})

Try it online!

Wolfram Language (Mathematica), 93 bytes

FromDigits[LetterNumber/@Characters@"h h agdbdgideabhgehhfdeii difaga geg  egedcfh         "]

Try it online!

deleted 3 characters in body
Source Link
ZaMoC
ZaMoC
  • 25.5k
  • 2
  • 32
  • 87

Wolfram Language (Mathematica), 149 bytes

Times@@(Prime[Join[Range[(b=Floor@E)^(b+(a=x~D~x))+b+a],{(d=b^(b+b))-b-a},{d-1a},{d+1d+a},{d+b+b}]]^{d(b+a)-b,d+b+b,d/b+a,b^b+b,b,b+a,a,a,a,a,a,a,a,a,a})

Try it online!Try it online!

Wolfram Language (Mathematica), 149 bytes

Times@@(Prime[Join[Range[(b=Floor@E)^(b+(a=x~D~x))+b+a],{(d=b^(b+b))-b-a},{d-1},{d+1},{d+b+b}]]^{d(b+a)-b,d+b+b,d/b+a,b^b+b,b,b+a,a,a,a,a,a,a,a,a,a})

Try it online!

Wolfram Language (Mathematica), 149 bytes

Times@@(Prime[Join[Range[(b=Floor@E)^(b+(a=x~D~x))+b+a],{(d=b^(b+b))-b-a},{d-a},{d+a},{d+b+b}]]^{d(b+a)-b,d+b+b,d/b+a,b^b+b,b,b+a,a,a,a,a,a,a,a,a,a})

Try it online!

Source Link
ZaMoC
ZaMoC
  • 25.5k
  • 2
  • 32
  • 87

Wolfram Language (Mathematica), 149 bytes

Times@@(Prime[Join[Range[(b=Floor@E)^(b+(a=x~D~x))+b+a],{(d=b^(b+b))-b-a},{d-1},{d+1},{d+b+b}]]^{d(b+a)-b,d+b+b,d/b+a,b^b+b,b,b+a,a,a,a,a,a,a,a,a,a})

Try it online!