No. 080 モンテカルロ法

横400縦400のウィンドウを開き、0から399までの乱数を2つ生成してx,y座標とし、原点からの距離が400以下であれば赤、400よりも大きければ青の円をその位置に描く。この手順を繰り返し、正方形中のランダムな位置に円を10000個描きながら赤の点の個数を数え、点の個数から円周率の近似値を求めるプログラムを作成せよ。

実行例

pi = 3.152000