Select Code to Download

for my $i (1..20) {
  print "$i: ";
...
  print "" . (1-1/2000)**$i;
  print "\n";
}

1: 0.9995 - 0.9995 - 0.9995
2: 0.9995 - 0.9995 - 0.99900025
3: 0.9995 - 0.9995 - 0.998500749875
...
18: 0.9995 - 0.9995 - 0.991038148190984
19: 0.9995 - 0.9995 - 0.990542629116888
20: 0.9995 - 0.9995 - 0.99004735780233