VBA

大学一年でプログラミングを勉強しているものです。来週の情報の授業で以下の問題のプログラムを勉強するのですが、予習する上で、予めどのようなプログラム表記になるのか気になったので、質問させて頂きました。何方か分かる方がいれば、ご教授お願い致します。

原点を中心とする辺長 2 の正方形 ABCD と半径 1 の内接円があります。正方形 ABCD の中にランダムに n 点ばらまいて，円内に落ちた点数 n1 を数え，円周率の値と誤差を計算する Hit-or-miss Monte Carlo 法のプログラムを作りなさい。

No.1 回答者： Zincer 回答日時： 2023/01/19 17:27

日本語で書くと、

０．必要な変数の定義および初期化
１．-１～1の範囲の乱数を１つ発生させて点P1のX座標とする。
２．-１～1の範囲の乱数を１つ発生させて点P1のY座標とする。
（上記2つは順不同）
３．点P1と原点（０，０）との距離を計算する。
４．（３）の値が１（＝内接円の半径）以下（＝円内）であればカウント定数を１つ加える。
５．（１）から（５）を必要数（N）回繰り返す。
６．（円内の点数／N）×４と円周率の値を比較して誤差を計算する。
※（６）を（５）に組み込んでNの増加に伴う誤差の変化を見ても面白いかも？
VBAではありませんが、アルゴリズムは同じなので参考にしてください。
RUSTで円周率をモンテカルロ法で求めた
https://qiita.com/tnagai-github/items/bed481ed8a …