{#, MonteCarloPi[#]} & /@ (10^Range[1, 7]) // Grid