数学建模与数学实验-14.4M-doc.zip

				clear
				cs=100;
				for j=1:cs
				   j  
				w(j)=0;
				  
				i=2;
				x(i)=exprnd(10);
				c(i)=x(i);
				b(i)=x(i);
				
				while b(i)				   y(i)=unifrnd(4,15); 
				   e(i)=b(i)+y(i);   
				   w(j)=w(j)+b(i)-c(i);   
				   
				   i=i+1;   
				   x(i)=exprnd(10);   
				   c(i)=c(i-1)+x(i);   
				   b(i)=max(c(i),e(i-1));   
				end
				
				i=i-2;
				t(j)=w(j)/i;
				m(j)=i;
				end
				   
				
				pt=0;
				pm=0;
				for j=1:cs
				   pt=pt+t(j);
				   pm=pm+m(j);
				end
				pt=pt/cs
				pm=pm/cs