Расчет динамики разгона судна на подводных крыльях
Курсовой проект - Транспорт, логистика
Другие курсовые по предмету Транспорт, логистика
^4)=A104+$A$82=(A105+A104)/2=1/-($D$55+$E$55*B105+$F$55*B105^2+$G$55*B105^3+$H$55*B105^4)=A105+$A$82=(A106+A105)/2=1/-($D$55+$E$55*B106+$F$55*B106^2+$G$55*B106^3+$H$55*B106^4)=A106+$A$82=(A107+A106)/2=1/-($D$55+$E$55*B107+$F$55*B107^2+$G$55*B107^3+$H$55*B107^4)=A107+$A$82=(A108+A107)/2=1/-($D$55+$E$55*B108+$F$55*B108^2+$G$55*B108^3+$H$55*B108^4)=A108+$A$82=(A109+A108)/2=1/-($D$55+$E$55*B109+$F$55*B109^2+$G$55*B109^3+$H$55*B109^4)=A109+$A$82=(A110+A109)/2=1/-($D$55+$E$55*B110+$F$55*B110^2+$G$55*B110^3+$H$55*B110^4)=A110+$A$82=(A111+A110)/2=1/-($D$55+$E$55*B111+$F$55*B111^2+$G$55*B111^3+$H$55*B111^4)=A111+$A$82=(A112+A111)/2=1/-($D$55+$E$55*B112+$F$55*B112^2+$G$55*B112^3+$H$55*B112^4) =СУММ(C103:C112) int=110000*A82*C113
Паскаль (разгон)
DIF1;
m,tn,tk,ht:REAL;,I:INTEGER;,V,S:array[1..210]of REAL;,f2,f3:TEXT;(f1,c:\Student\555\t.TXT);(f1);(f2,c:\Student\555\V.TXT);(f2);(f3,c:\Student\555\S.TXT);(f3);:=110000;(ўўҐЁ n,tn,tk,t[1],V[1],S[1]);(n,tn,tk,t[1],V[1],S[1]);:=(tk-tn)/n;I:=1 TO n DO[I+1]:= t[I]+ht;[I+1]:= V[I]+ht*((1/m)*((19219+313.88*V[I]-41.58*SQR(V[I]))-(-1131.4+2212*V[I]-84.604*SQR(V[I]))));[I+1]:= S[I]+ht*V[I];(f1,t[I+1]:8:3);(f2,V[I+1]:8:3);(f3,S[I+1]:8:3);;(f1);(f2);
close(f3);.
Vt0,7940,5151,5341,032,2261,5462,8732,0613,4812,5764,0523,0914,5893,6065,0964,1225,5754,6376,0295,15218,2598,40218,25598,91718,2699,43318,26499,94818,269100,46318,274100,97818,279101,49318,283102,00918,288102,52418,292103,039St00,5150,4091,031,21,5462,3462,0613,8272,5765,623,0917,7073,60610,0724,12212,6974,63715,575,1521490,69998,4021500,10198,9171509,50699,4331518,91399,9481528,323100,4631537,735100,9781547,15101,4931556,567102,0091565,986102,5241575,408103,039
Рис. 7
Паскаль (торможение)
PROGRAM DIF1;,tn,tk,ht:REAL;,I:INTEGER;,V,S:array[1..210]of REAL;,f2,f3:TEXT;(f1,c:\Student\555\1t.TXT);(f1);(f2,c:\Student\555\1V.TXT);(f2);(f3,c:\Student\555\1S.TXT);(f3);:=110000;(ўўҐЁ n,tn,tk,t[1],V[1],S[1]);(n,tn,tk,t[1],V[1],S[1]);:=(tk-tn)/n;I:=1 TO n DO[I+1]:= t[I]+ht;[I+1]:= V[I]+ht*((1/m)*(-(-1131.4+2212*V[I]-84.604*SQR(V[I]))));[I+1]:= S[I]+ht*V[I];(f1,t[I+1]:8:3);(f2,V[I+1]:8:3);(f3,S[I+1]:8:3);;(f1);(f2);
close(f3);.
StVt14,1320,76217,9310,76227,7931,52417,2861,52440,9622,28616,6172,28653,6223,04715,9273,04765,7553,80915,2193,80977,354,57114,4994,57188,3975,33313,7715,33398,8886,09513,0396,095108,8226,85712,3086,857118,1997,61911,5837,619346,662145,5130,995145,513347,42146,2750,995146,275348,178147,0370,995147,037348,936147,7990,995147,799349,694148,5610,995148,561350,452149,3230,995149,323351,21150,0840,995150,084351,969150,8460,995150,846352,727151,6080,995151,608353,485152,370,995152,37
Рис. 8
Выводы
Вторая модельная задача не представляет точных результатов по времени и пути разгона. Более точными следует считать результаты первой и третьей модельных задач, т.к. графики, полученные в результате интерполяции максимально точно приближены к исходным.
Огромное время торможения судна можно объяснить неточностью конечного графика сопротивления воды R(V): при скоростях менее 0.5 м/с, сопротивление близко к нулю и судно перестает тормозить.