ganche.m

来自「matlab编写的计算机模拟程序 很方便使用 注释很清楚」· M 代码 · 共 35 行

s=0;
x1=rand(10000,1);
x2=rand(10000,1);
x3=randn(10000,1);
for i=1:10000
    T2=30+2*x3(i);
    if x1(i)<0.7
        T1=0;
    else if x1(i)<0.9
            T1=5;
        else
            T1=10;
        end
    end
   
        
        if x2(i)<0.3
            T3=28;
        else if x2(i)<0.7
                T3=30;
            else if x2(i)<0.9
                    T3=32;
                else
                    T3=34;
                end
            end
        end
            
           
            if T3<T1+T2
                s=s+1;
            end
        
end
        [s/10000]