此文件包括蒙特卡罗方法的基本思想及应用

				function proguji=liti3(n,mm)
				frq=0;
				randnum=unidrnd(n,mm,3);proguji=0;
				for i=1:mm
				    a=(randnum(i,1)+1)*(randnum(i,2)+1)*(randnum(i,3)+1)
				    if  mod(a,2)==1
				        frq=frq+1
				    end
				end; 
				proguji=frq/mm