【正文】 rintf(請輸入單位道床縱向阻力r=\n)。 scanf(%lf, amp。r)。 printf(請輸入標準軌的長度l=\n)。 scanf(%lf, amp。l)。 printf(請輸入鋼軌接頭阻力Ph=\n)。 scanf(%lf, amp。Ph)。 printf(請輸入鋼軌截面面積F=\n)。 scanf(%lf, amp。F)。 printf(請輸入該地區(qū)最低軌溫Tmin=\n)。 scanf(%lf, amp。Tmin)。 printf(請輸入該地區(qū)最高軌溫Tmax=\n)。 scanf(%lf, amp。Tmax)。 printf(請輸入鋼軌的線膨脹系數(shù)w=\n)。 scanf(%lf, amp。w)。 printf(請輸入軌枕間距a=\n)。 scanf(%lf, amp。a)。 for (i=0。 i11。 i++) { Pt=w*E*F*(T[i]Tmin)。 Pt1=E*F*w*(TmaxT[i])。 ls=(PtPh)/r。 ls1=(Pt1Ph)/r。 if(lsl/2) ld1=(PtPh)*(PtPh)/(2*E*F*r)。 else ld1=((PtPh)*lr*l*l/4)/(2*E*F)。 if(ls1l/2) ld2=(Pt1Ph)*(Pt1Ph)/(2*E*F*r)。 else ld2=((Pt1Ph)*lr*l*l/4)/(2*E*F)。 lc1=(PtPh)*(PtPh)/(2*E*F*r)。 lc2=(Pt1Ph)*(Pt1Ph)/(2*E*F*r)。 a1=ag(lc1+ld1)。 a2=lc2+ld2。 a0=(a1+a2)/2。 printf(當溫度為%lf\n時鋼軌預留軌縫為%lf\n, T[i],a0)。 }}從而可知，176。C用手算和軟件程序所算的取值是一致的。因此根據(jù)程序所算，其余溫度的預留軌縫：溫度/176。C預留軌縫/cm標準軌之間預留軌縫設計：（176。C） 774cm（176。C）用程序驗算標準軌與標準軌之間預留軌縫includevoid main(){ double T[11]={, , , , , , , , , , }。 int i。 double w, a, l, Ph, E=210000, F, ag=。 /*w為線膨脹系數(shù)，r2為每枕縱向阻力，a為枕間距，l為標準軌長，Ph為接頭阻力，E為彈性模量， F為橫截面面積，ag為構造軌縫*/ double Pt, lc1, lc2, ld1, ld2, ls, ls1, a1, a2, a0, r, Pt1, Tmin, Tmax。 /*Pt為鋼軌溫度力，lclc2為從鎖定軌溫到當?shù)刈畹蛙墱貢r，長軌、短軌一端的伸縮量， lclc4為從鎖定軌溫到當?shù)刈罡哕墱貢r，長軌、短軌一端的伸長量， aa2為預留軌縫上下限，a0為預留軌縫值，r為每股鋼軌單位長度線路縱向阻力*/ printf(請輸入單位道床縱向阻力r=\n)。 scanf(%lf, amp。r)。 printf(請輸入標準軌的長度l=\n)。 scanf(%lf, amp。l)。 printf(請輸入鋼軌接頭阻力Ph=\n)。 scanf(%lf, amp。Ph)。 printf(請輸入鋼軌截面面積F=\n)。 scanf(%lf, amp。F)。 printf(請輸入該地區(qū)最低軌溫Tmin=\n)。 scanf(%lf, amp。Tmin)。 printf(請輸入該地區(qū)最高軌溫Tmax=\n)。 scanf(%lf, amp。Tmax)。 printf(請輸入鋼軌的線膨脹系數(shù)w=\n)。 scanf(%lf, amp。w)。 printf(請輸入軌枕間距a=\n)。 scanf(%lf, amp。a)。 for (i=0。 i11。 i++) { Pt=w*E*F*(T[i]Tmin)。 Pt1=E*F*w*(TmaxT[i])。 ls=(PtPh)/r。 ls1=(Pt1Ph)/r。 if(lsl/2) { lc1=(PtPh)*(PtPh)/(2*E*F*r)。 ld1=(PtPh)*(PtPh)/(2*E*F*r)。 } else { lc1=((PtPh)*lr*l*l/4)/(2*E*F)。 ld1=((PtPh)*lr*l*l/4)/(2*E*F)。 } if(ls1l/2) { lc2=(Pt1Ph)*(Pt1Ph)/(2*E*F*r)。 ld2=(Pt1Ph)*(Pt1Ph)/(2*E*F*r)。 } else { lc2=((Pt1Ph)*lr*l*l/4)/(2*E*F)。 ld2=((Pt1Ph)*lr*l*l/4)/(2*E*F)。 } a1=ag(lc1+ld1)。 a2=lc2+ld2。 a0=(a1+a2)/2。 printf(當溫度為%1f\n時鋼軌預留軌縫為%1f\n, T[i],a0)。 }}從而可知，176。C條件下。倆值誤差為1/1000，用手算和軟件程序所算的取值可近似一致。因此根據(jù)程序所算，其余溫度的預留軌縫：溫度/176。C預留軌縫/cm六、設計總結本設計根據(jù)所給的工程資料將延邊某段提速區(qū)域的無縫線路軌道鎖定溫度和預留軌縫寬度進行了設計，在設計中主要參照了課本的計算公式與參數(shù)選擇。通過這幾天的設計，不僅使我對已學的知識進行了鞏固和加深，更了解到無縫軌道設計的過程，在設計中發(fā)現(xiàn)了以下結論：，使軌道溫度應力升高，致使軌道應力大于允許應力，造成軌道的變形和破壞。這說明了在溫差較大的地方是不利于鋪設無縫線路的，如果有工程需求，就要加強軌道的強度以及相應的構造措施來保證軌道的穩(wěn)定承載。、最低溫度決定，另一方面是由于軌道自身的材料性質決定。在鎖定軌溫的選擇中，施工溫度為一個溫度區(qū)域。，保證夏天不脹軌，冬天軌道不被拉壞。從之前計算結果可以看出，在設計范圍內(nèi)，隨施工溫度的升高，軌縫由大變小。，延邊地區(qū)冬季氣溫較低，軌道長度收縮較大，盡管夏季溫度不是特別高，但是夏季產(chǎn)生的軌道長度伸長量已經(jīng)超過了冬季所能預留軌縫的數(shù)值，但經(jīng)驗算，數(shù)據(jù)還是合格通過的。最終結論是，176。C， cm。建議：如果想要修建無縫線路，可以將軌枕從1667根/km提高到1840根/km，從而提高等效床阻力，減小冬季軌道收縮量。