Select Code to Download

@_=map(1/$_,map($_**2,1..1000000));for(@_){$s+=$_[$i++]}$s*=6;print sq
+rt$s;

@_=map(1/$_,map($_**2,1..1000000));for(@_){$s+=$_[$i++]}print sqrt$s*6