2010年上海世博会门票销售策略再研究
{
switch(id) {
case IDC_OK: { TCHAR NUM1[256];
TCHAR NUM2[256];
TCHAR NUM4[256]; GetDlgItemText(hwnd,IDC_EDIT1,NUM1,sizeof(NUM1)); GetDlgItemText(hwnd,IDC_EDIT2,NUM2,sizeof(NUM2));
double n1=10000*atof(NUM1);
double n2=10000*atof(NUM2);
double n3=0; if(n1<=n2)
{
MessageBox(hwnd,TEXT(\输
入
错
误
\
\ }
double n4=n2/n1;
int combosel=ComboBox_GetCurSel(GetDlgItem(hwnd,IDC_COMBO1)); switch(combosel) { case 0: { n3=0.125*400/3+0.125*900/7+n4*90+160*(0.75-n4);
} break;
case 1:
35
提
示
2010年上海世博会门票销售策略再研究
{
n3=n4*90+200*(1-n4);
default:
{
MessageBox(hwnd,TEXT(\错误，选择平日票或指定日票\通知} break;
\
TCHAR NUM3[256];
return; }
break;
}
sprintf(NUM3,\
}
SetDlgItemText(hwnd,IDC_EDIT3,NUM3);
break; default:
break;
} }
void Main_OnClose(HWND hwnd) {
EndDialog(hwnd, 0); }
36
2010年上海世博会门票销售策略再研究
程序3：夜票和日票数量的线性回归分析
y=[7.9643 5.2843 5.65 5.25 3.7582 5.54 5.4649 3.76 3.93 3.8101 5.46 5.0231 5.28 4.83 4.61 4.084];
x=[3.9922 2.3879 2.29 2.13 1.2544 2.31 1.9904 1.31 1.16 1.0204 1.7723 1.62 1.35 1.15 1.558]; n=16;X=[ones(n,1),x']; [b,bint,r,rint,s]=regress(y',X); b,bint,s
程序4：计算参观大馆和小馆的可能性 clear,clc
A=unique([perms([1,0,0,0]);perms([1,1,0,0]);perms([1,1,1,0]);perms([1,1,1,1])],'rows'); X=[2.37 1.97 1.77 1.52]; Y=[2.37 1.97 1.77 1.52 1.34 0.68]; B=zeros(2^6,6); for i=1:size(A,1)
for p=0:(round(8/1.34)+2) for q=0:(round(8/0.68)+2)
if 7.31<=p*1.34+q*0.68+A(i,:)*X' && p*1.34+q*0.68+A(i,:)*X'<=8 B(size(unique(B,'rows'),1)+1,:)=[A(i,:) p q]; end end end
37
1.62
2010年上海世博会门票销售策略再研究
end
sol=vpa([unique(B,'rows'),unique(B,'rows')*Y'],3)
38