西安交大数学建模实验程序总汇.docx

数 学 建 模 实 验 报 告 姓名：xxx 学号：xxxx 班级：xx 学院：xxxx 1，存货问题 （一）问题描述 某企业对于某种材料的月需求量为随机变量，具有如下表概率分布： 需求量（吨）50607080901001101200.050.100.150.250.200.100.100.05每次订货费为500元，每月每吨保管费为50元，每月每吨货物缺货费为1500元，每吨材料的购价为1000元。该企业欲采用周期性盘点的策略来控制库存量，求最佳的，值。（注：策略指的是若发现存货量少于s时立即订货，将存货补充到S，使得经济效益最佳。） （二）问题分析 随机产生每个月需求量的概率，取遍每一个S和s的值，将每种S，s的组合对应的每月平均花费保存在数组money里，筛选数组，选出其中费用最小值，并求出对应的S和s。模拟400个月的生产情况。 （三）程序代码 clear;clc; need=0; remain=0; cost=0; mincostavg=inf; forsl=30:10:70 forsh=80:10:140 fornum=1:100000 m=rand; if m=0.1 need=50; elseif m=0.3 need=60; elseif m=0.45 need=70; elseif m=0.7 need=80; elseif m=0.75 need=90; elseif m=0.85 need=100; elseif m=0.95 need=110; else need=120; end if remainsl cost=cost+(sh-remain)*1000+500; ifshneed cost=cost+(need-sh)*1500; remain=0; else cost=cost+(sh-need)*50; remain=sh-need; end else if remainneed cost=cost+(need-remain)*1500; remain=0; else cost=cost+(remain-need)*50; remain=remain-need; end end end costavg=cost/100000; ifcostavgmincostavg mincostavg=costavg; propersl=sl; propersh=sh; end fprintf(s=%d, S=%d\nMonthly average cost=%.1f\n,sl,sh,costavg); cost=0; end end fprintf(\nWhen s=%d, S=%d\nThe least monthly average cost=%.1f\n,propersl,propersh,mincostavg); （四）运行结果 s=30, S=80 Monthly average cost=85466.9 s=30, S=90 Monthly average cost=87007.6 s=30, S=100 Monthly average cost=87114.2 s=30, S=110 Monthly average cost=87951.0 s=30, S=120 Monthly average cost=86778.9 s=30, S=130 Monthly average cost=86411.8 s=30, S=140 Monthly average cost=86374.8 s=40, S=80 Monthly average cost=83707.2 s=40, S=90 Monthly average cost=84026.6 s=40, S=100 Monthly average cost=85089.1 s=40, S=110 Monthly average cost=85386.0 s=40, S=120 Monthly average cost=86294.0 s=40, S=130 Monthly average cost=85148.0 s=40, S=140 Monthly average cost=84992.9 s=50, S=80 Monthly average cost=83693.0 s=50, S=90 Monthly average cost=82548.0 s=50, S=10