fork download
  1. x = <>use Math::BigInt;
  2.  
  3. $x = $*IN;
  4. while(1){
  5. $x=$x-1;
  6. if($x==0)break;
  7. my $input = $*IN;
  8. my $x = Math::BigInt->new($input);
  9. print $x->bsqrt();
  10. }
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
Standard input is empty
compilation info
===SORRY!===
Unsupported use of <>; in Perl 6 please use lines() or () at line 1, near "<>use Math"
stdout
Standard output is empty