[交流] 【求助】请大家帮忙翻译一下程序，太难啦，实在看不懂 已有2人参与

太难啦 double CPressData::JPress(double x,double y)//x代表h垂直,y代表k水平 { CString ll; double h0;//h0是高炉总长 double htrue;//htrue是炉料实际高 double rls;//炉身(即炉料处)处的半径计算 int j,i;//j为高炉垂直方向的单元数;i为水平方向的单元数 int n; h0=m_epdh1+m_epdh2+m_epdh3+m_epdh4+m_epdh5; htrue=h0-m_epdmh; rls=m_epdd1/2+(m_epdmh-m_epdh1)*tan((90-m_epda1)/180); j=(int)floor(htrue/y); i=(int)floor(rls/x); int l1,l2,l3,l4; int nn=0; double rx;//任意径向半径 double d;//任意径向直径 double jp[500];//静压力值-34- double kesi=0.45;//炉料侧压系数0.3-0.6 char str[100];//存储数据输出 l1=j-(int)floor((m_epdh3+m_epdh4+m_epdh5)/y); l2=j-(int)floor((m_epdh4+m_epdh5)/y); l3=j-(int)floor(m_epdh5/y); l4=j; m_listpd.AddString("静压力的数据输出"; for(n=1;n { rx=rls+n*y*atan(m_epda1/180); d=2*rx; jp[n]=9.8*(d*m_epdpd)*(1-exp(-4*m_epdgr*kesi*n*y/d))/(4*m_epdgr*kesi); _gcvt(jp[n],10,str); m_listpd.AddString(str); } for(n=l1;n { d=m_epdd2; jp[n]=9.8*(d*m_epdpd)*(1-exp(-4*m_epdgr*kesi*n*y/d))/(4*m_epdgr*kesi); gcvt(jp[n],10,str); m_listpd.AddString(str); } for(n=l2;n { nn++; rx=m_epdd2/2-nn*y*atan(m_epda2/180); d=2*rx; jp[n]=9.8*(d*m_epdpd)*(1-exp(-4*m_epdgr*kesi*n*y/d))/(4*m_epdgr*kesi); gcvt(jp[n],10,str); m_listpd.AddString(str); }for(n=l3;n { d=m_epdd3; jp[n]=9.8*(d*m_epdpd)*(1-exp(-4*m_epdgr*kesi*n*y/d))/(4*m_epdgr*kesi); gcvt(jp[n],10,str); m_listpd.AddString(str); } return array[1000]; }

回复此楼