Help for this page
1while($x||=3)-($x-=sin$x/cos$x);print"$x\n"
1while($x||=2)-($x-=((log($x)-1)*$x));print"$x\n"