map{my$s;$s+=($t=-$t)/($i-=2)for($i=$t=1)x<>;print$s,$/}1..<>