CODE:

#include "DxLib.h"
 
int WINAPI WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance,LPSTR lpCmdLine, int nCmdShow ){
        ChangeWindowMode( TRUE ) ; // ウインドウモードに変更
        if( DxLib_Init() == -1 ) return -1; // ＤＸライブラリ初期化処理 エラーが起きたら終了
		SetDrawScreen( DX_SCREEN_BACK ) ;           // 描画先を裏画面に設定
		SetAlwaysRunFlag(TRUE);
 		unsigned int i;
 		unsigned int in;
 		int White;
 		double x,y;
 		double pi_4;
 		double pi;
 		White=GetColor(255,255,255);
 		in=0;
 		for(i=0;i<0x7fffffff;i++) {
 			x=(double)GetRand(1000000000)/1000000000;
 			y=(double)GetRand(1000000000)/1000000000;
 			if(x*x+y*y<1)in++;
 			/*進行状況の表示*/
 			if((i & 0xffffff)==0) {
 				ClearDrawScreen();
 				DrawString(50,20,"計算中",White);
 				DrawFormatString(50,50, White , "%1.2f%%" ,
 					(double)i/0x7fffffff*100);
 				DrawBox(10,100,630,130,White,FALSE);
 				DrawBox(10,100,10+(int)(620*(double)i/0x7fffffff),
 					130,White,TRUE);
 				ScreenFlip();
 				if(ProcessMessage()!=0)break;
 			}
 		}
 		/*結果の表示*/
 		pi_4=(double)in/0x7fffffff;
 		pi=pi_4*4;
 		ClearDrawScreen();
 		DrawString(50,20,"計算完了",White);
 		DrawFormatString(50,50,White,"試行回数：%d回",0x7fffffff);
 		DrawFormatString(50,80,White,"円の中に入った回数：%d回",in);
 		DrawFormatString(50,110,White,"円の中に入った割合：%1.15f",pi_4);
 		DrawFormatString(50,140,White,"円周率：%1.15f",pi);
 		ScreenFlip();
 		/*ファイルにも出力*/
 		FILE* out;
 		out=fopen("result.txt","w");
 		if(out!=NULL) {
 			fprintf(out,"試行回数：%d回\n",0x7fffffff);
 			fprintf(out,"円の中に入った回数：%d回\n",in);
 			fprintf(out,"円の中に入った割合：%1.15f\n",pi_4);
 			fprintf(out,"円周率：%1.15f\n",pi);
 			fclose(out);
 		}
 
        WaitKey() ;             // キーの入力待ち(『WaitKey』を使用) 
        DxLib_End() ;           // ＤＸライブラリ使用の終了処理
        return 0 ;              // ソフトの終了
}