Skip to main content
added 5 characters in body
Source Link
LegionMammal978
  • 18k
  • 4
  • 24
  • 57

Mathematica, 18 bytes, $107,163.49

$~Print~N[E^(E!E)]

Full program; run using MathematicaScipt -script. Outputs $107163.4882807548 followed by a trailing newline. I have verified that this is the highest-scoring solution of the form $~Print~N[expr] where expr is comprised of Pi, E, I, and +-* /()!.

Mathematica, 18 bytes, $107,163.49

$~Print~N[E^(E!E)]

Full program; run using MathematicaScipt -script. Outputs $107163.4882807548 followed by a trailing newline. I have verified that this is the highest-scoring solution of the form $~Print~N[expr] where expr is comprised of Pi, E, and +-* /()!.

Mathematica, 18 bytes, $107,163.49

$~Print~N[E^(E!E)]

Full program; run using MathematicaScipt -script. Outputs $107163.4882807548 followed by a trailing newline. I have verified that this is the highest-scoring solution of the form $~Print~N[expr] where expr is comprised of Pi, E, I, and +-* /()!.

Source Link
LegionMammal978
  • 18k
  • 4
  • 24
  • 57

Mathematica, 18 bytes, $107,163.49

$~Print~N[E^(E!E)]

Full program; run using MathematicaScipt -script. Outputs $107163.4882807548 followed by a trailing newline. I have verified that this is the highest-scoring solution of the form $~Print~N[expr] where expr is comprised of Pi, E, and +-* /()!.