Skip to main content
deleted 48 characters in body
Source Link
Jo King
  • 47.5k
  • 5
  • 125
  • 186

Perl 6, a trillion-2/6567 bytes

{$!=.FatRat²/$!+$_+$_-?e}for 𖭡²…¹;say𐄳²…¹;say substr ⁴/$!,^𖭡^²³²

Try it online!Try it online!

Takes a very long time to compute. This can be arbitrarily extended pretty easily. As an example here's an altered version that only prints the first 9981000 digits.

Perl 6, a trillion-2/65

{$!=.FatRat²/$!+$_+$_-?e}for 𖭡²…¹;say substr ⁴/$!,^𖭡

Try it online!

Takes a very long time to compute. This can be arbitrarily extended pretty easily. As an example here's an altered version that only prints the first 998 digits.

Perl 6, 67 bytes

{$!=.FatRat²/$!+$_+$_-?e}for 𐄳²…¹;say substr ⁴/$!,^²³²

Try it online!

Takes a very long time to compute. As an example here's an altered version that only prints the first 1000 digits.

Source Link
Jo King
  • 47.5k
  • 5
  • 125
  • 186

Perl 6, a trillion-2/65

{$!=.FatRat²/$!+$_+$_-?e}for 𖭡²…¹;say substr ⁴/$!,^𖭡

Try it online!

Takes a very long time to compute. This can be arbitrarily extended pretty easily. As an example here's an altered version that only prints the first 998 digits.