END{for($0=.5;i++<300;++p)print$i=r=$p+$(p=i-r)}