p=8; c=2; w=5; Lr =2; mu =120; se = 10;
Ls =1.3;
Fq = @ (q) normcdf(q, mu, se);
fq = @ (q) normpdf(q, mu, se);
obj = @(q) 1/(Lr-Ls)*(p*Fq(q)-c) + (2+Ls)/(2+Ls+Lr)*p*fq(q).*q+ ...
      (1+Ls)/(2+Ls+Lr)*p*Fq(q) + (1+Lr)/(2+Ls+Lr)*c -w;   
X = fzero(obj, 1)

X = 104.1413

2楼朋友，那积分您是怎么处理的呢》？

非常感谢二楼的程序，感谢

Fq = @ (q) normcdf(q, mu, se);
fq = @ (q) normpdf(q, mu, se);

Check Stat. Toolbox