$n=0; print ($n,"\n"); while ($n<1){ $n=$n+.1; printf ("%0.18f \n", $n); }