Главная
Популярная публикация
Научная публикация
Случайная публикация
Обратная связь
ТОР 5 статей:
Методические подходы к анализу финансового состояния предприятия
Проблема периодизации русской литературы ХХ века. Краткая характеристика второй половины ХХ века
Ценовые и неценовые факторы
Характеристика шлифовальных кругов и ее маркировка
Служебные части речи. Предлог. Союз. Частицы
КАТЕГОРИИ:
|
Блок-схема підпрограми PodNap на рисунку 4.2
Ввод RastC, SoprR, SoprK, Rast
| Связывание логических и физических файлов FTokA c RezPodA.dat; FDelU c DelUp.dat;
FDelP c RezDelP.dat; FTokP1 c TokPoez1.dat; FTokP2 c TokPoez2.dat;
FTokP3 c TokPoez3.dat; FTokP4 c TokPoez4.dat; FTokP5 c TokPoez5.dat;
FTokP6 c TokPoez6.dat; FTokP7 c TokPoez7.dat; ContIsp.dat c FCon
| Открытие файлов FTokP1, FTokP2, FTokP3, FTokP4, FTokP5, FTokP6, FTokP7 на чтение
| Открытие файлов FTokA, FDelU, FDelP на перезапись
| Чтение Vrem,TokP1,RastP1, TokP2,RastP2, TokP3,RastP3, TokP4,RastP4, TokP5,RastP5, TokP6,RastP6, TokP7,RastP7.
| Tok11B1:=TokP1*(RastP1-RastC)/(Rast-RastC)
Tok11C1:= TokP1*(Rast-RastP1)/(Rast-RastC)
Tok11A1:=0
| Tok11A1:=TokP1*(RastC-RastP1)/RastC
Tok11C1:=TokP1*RastP1/RastC
Tok11B1:=0
| Tok12B1:=TokP2*(RastP2-RastC)/(Rast-RastC)
Tok12C1:= TokP2*(Rast-RastP2)/(Rast-RastC)
Tok12A1:=0
| Tok12A1:=TokP2*(RastC-RastP2)/RastC
Tok12C1:=TokP2*RastP2/RastC
Tok12B1:=0
| Tok13A1:=TokP3*(RastC-RastP3)/RastC
Tok13C1:=TokP3*RastP3/RastC
Tok13B1:=0
| Tok13B1:=TokP3*(RastP3-RastC)/(Rast-RastC)
Tok13C1:= TokP3*(Rast-RastP3)/(Rast-RastC)
Tok13A1:=0
|
Рисунок 4.2 – Блок-схема програми PodNap
TokC, TokCA1, TokCA2, TokCB1, TokCB2, TokA1, TokA2, TokB1, TokB2, TokC1C2, TokC2C1
| DelUk11:=SoprK*(RastP1*(TokP1+
+TokC1C2-TokB1)+RastP2*TokP2+
+RastP3*TokP3+RastP4*TokP4)
| Tok14B1:=TokP4*(RastP4-RastC)/(Rast-RastC)
Tok14C1:= TokP4*(Rast-RastP4)/(Rast-RastC)
Tok14A1:=0
| Tok25B2:=TokP5*(RastP5-RastC)/(Rast-RastC)
Tok25C2:= TokP5*(Rast-RastP5)/(Rast-RastC)
Tok25A2:=0
| Tok26B2:=TokP6*(RastP6-RastC)/(Rast-RastC)
Tok26C2:= TokP6*(Rast-RastP6)/(Rast-RastC)
Tok26A2:=0
| Tok27B2:=TokP7*(RastP7-RastC)/(Rast-RastC)
Tok27C2:= TokP7*(Rast-RastP7)/(Rast-RastC)
Tok27A2:=0
| Tok14A1:=TokP4*(RastC-RastP4)/RastC
Tok14C1:=TokP4*RastP4/RastC
Tok14B1:=0
| Tok25A2:=TokP5*(RastC-RastP5)/RastC
Tok25C2:=TokP5*RastP5/RastC
Tok25B2:=0
| Tok26A2:=TokP6*(RastC-RastP6)/RastC
Tok26C2:=TokP6*RastP6/RastC
Tok26B2:=0
| Tok27A2:=TokP7*(RastC-RastP7)/RastC
Tok27C2:=TokP7*RastP7/RastC
Tok27B2:=0
| DelUk11:=SoprK*(RastP1*(TokP1-
-TokB1)+RastC*TokC1C2+RastP2*TokP2+
+RastP3*TokP3+RastP4*TokP4)
| Продовження рисунку 4.2 DelUk12:=SoprK*(RastP2*(TokP2+
+TokP1+TokC1C2-TokB1)+
+RastP3*TokP3+RastP4*TokP4)
| DelUk12:=SoprK*(RastP2*(TokP2+TokP1-
-TokB1)+RastC*TokC1C2+
+RastP3*TokP3+RastP4*TokP4)
| DelUk13:=SoprK*(RastP3*(TokP3+
+TokP2+TokP1+TokC1C2-TokB1)+
+RastP4*TokP4)
| DelUk13:=SoprK*(RastP3*(TokP3+
+TokP2+TokP1-TokB1)+RastC*TokC1C2+
+RastP4*TokP4)
| DelUk14:=SoprK*(RastP4*(TokP4+
+TokP3+TokP2+TokP1+TokC1C2-TokB1))
| DelUk14:=SoprK*(RastP4*(TokP4+TokP3+
+TokP2+TokP1-TokB1)+RastC*TokC1C2)
|
Продовження рисунку 4.2
DelUk25:=SoprK*(RastP5*(TokP5+
+TokP6+ TokP7+TokC1C2-TokB2))
| DelUk25:=SoprK*(RastP5*(TokP5+TokP6++TokP7-TokB2)+RastC*TokC2C1)
| DelUk26:=SoprK*(RastP6*(TokP6+
+TokP7+TokC1C2-TokB2)+
+RastP5*TokP5)
| DelUk26:=SoprK*(RastP6*(TokP6+TokP7-
-TokB2)+RastC*TokC2C1+RastP5*TokP5)
| DelUk27:=SoprK*(RastP7*(TokP7+
+TokC1C2-TokB2)+RastP6*TokP6+
+RastP5*TokP5)
| DelUk27:=SoprK*(RastP7*(TokP7-
-TokB2)+RastC*TokC2C1+
+RastP6*TokP6+RastP5*TokP5)
|
Продовження рисунку 4.2
DelUR11:=SoprR*(RastP1*(TokP1-
-TokB1)+RastP2*TokP2+RastP3*TokP3+
+RastP4*TokP4)
| DelUR12:=SoprR*(RastP2*(TokP2+
+TokP1-TokB1)+RastP3*TokP3+
+RastP4*TokP4)
| DelUR13:=SoprR*(RastP3*(TokP3+
+TokP2+TokP1-TokB1)+
+RastP4*TokP4)
| DelUR14:=SoprR*(RastP4*(TokP4+
+TokP3+TokP2+TokP1-TokB1))
| DelUR25:=SoprR*(RastP5*(TokP5+
+TokP6+TokP7-TokB2))
|
Продовження рисунку 4.2
DelUR26:=SoprR*(RastP6*(TokP6+
+TokP7-TokB2)+RastP5*TokP5)
| DelUR27:=SoprR*(RastP7*(TokP7-
-TokB2)+RastP6*TokP6+RastP5*TokP5)
| DelURR11:=SoprR*RastP1*(TokP5+
+TokP6+TokP7-TokB2)
| DelURR11:=SoprR*(RastP1*(TokP6++TokP7-TokB2)+RastP5*TokP5)
| DelURR11:=SoprR*(RastP1*(TokP7-
-TokB2)+RastP5*TokP5+
+RastP6*TokP6)
| DelURR11:=SoprR*(RastP5*TokP5+
+RastP6*TokP6+RastP7*TokP7-
-RastP1*TokB2)
|
Продовження рисунку 4.2
DelURR12:=SoprR*RastP2*(TokP5+
+TokP6+TokP7-TokB2)
| DelURR12:=SoprR*(RastP2*(TokP6+TokP7-TokB2)+RastP5*TokP5
| DelURR12:=SoprR*(RastP2*(TokP7--TokB2)+RastP5*TokP5+
+RastP6*TokP6
| DelURR12:=SoprR*(RastP5*TokP5+RastP6*TokP6+RastP7*TokP7-
-RastP2*TokB2
| DelURR13:=SoprR*RastP3*(TokP5+
+TokP6+TokP7-TokB2)
| DelURR13:=SoprR*(RastP3*(TokP6+TokP7-TokB2)+RastP5*TokP5
| DelURR13:=SoprR*(RastP3*(TokP7--TokB2)+RastP5*TokP5+
+RastP6*TokP6
| DelURR13:=SoprR*(RastP5*TokP5+RastP6*TokP6+RastP7*TokP7-
- RastP3*TokB2)
| Продовження рисунку 4.2
DelURR14:=SoprR*RastP4*(TokP5+
+TokP6+TokP7-TokB2)
| DelURR14:=SoprR*(RastP4*(TokP6+TokP7-TokB2)+RastP5*TokP5
| DelURR14:=SoprR*(RastP4*(TokP7--TokB2)+RastP5*TokP5+
+RastP6*TokP6
| DelURR14:=SoprR*(RastP5*TokP5+RastP6*TokP6+RastP7*TokP7-
-RastP4*TokB2
| DelURR25:=SoprR*RastP5*(TokP1+
+TokP2+TokP3+TokP4-TokB1)
| DelURR25:=SoprR*RastP5*(TokP1+
+TokP2+TokP3-TokB1)+
+RastP4*TokP4
|
Продовження рисунку 4.2
DelURR25:=SoprR*(RastP5*(TokP1+
+TokP2-TokB1)+
+RastP3*TokP3+RastP4*TokP4
| DelURR25:=SoprR*(RastP5*(TokP1-
-TokB1)+RastP2*TokP2+
+RastP3*TokP3+RastP4*TokP4
| DelURR25:=SoprR*(RastP4*TokP4+RastP3*TokP3+RastP2*TokP2+
+RastP1*TokP1-RastP5*TokB1)
| DelURR26:=SoprR*RastP6*(TokP1+
+TokP2+TokP3+TokP4-TokB1)
| DelURR26:=SoprR*RastP6*(TokP1+
+TokP2+TokP3-TokB1)+
+RastP4*TokP4
| DelURR26:=SoprR*(RastP6*(TokP1+
+TokP2-TokB1)+
+RastP3*TokP3+RastP4*TokP4
| DelURR26:=SoprR*(RastP6*(TokP1-
-TokB1)+RastP2*TokP2+
+RastP3*TokP3+RastP4*TokP4
| DelURR26:=SoprR*(RastP4*TokP4+RastP3*TokP3+RastP2*TokP2+
+RastP1*TokP1-RastP6*TokB1)
|
Продовження рисунку 4.2
DelURR27:=SoprR*RastP7*(TokP1+
+TokP2+TokP3+TokP4-TokB1)
| DelURR27:=SoprR*RastP7*(TokP1+
+TokP2+TokP3-TokB1)+
+RastP4*TokP4
| DelURR27:=SoprR*(RastP7*(TokP1+
+TokP2-TokB1)+
+RastP3*TokP3+RastP4*TokP4
| DelURR27:=SoprR*(RastP7*(TokP1-
-TokB1)+RastP2*TokP2+
+RastP3*TokP3+RastP4*TokP4
| DelURR27:=SoprR*(RastP4*TokP4+RastP3*TokP3+RastP2*TokP2+
+RastP1*TokP1-RastP7*TokB1)
| DelUkC1:=SoprK*(RastP1*TokP1+
+RastP2*TokP2+RastP3*TokP3+
+RastP4*TokP4)+
+RastC*(TokC1C2-TokB1)
DelURC1:=SoprR*(RastP1*TokP1+
+RastP2*TokP2+RastP3*TokP3+
+RastP4*TokP4)+
+RastC*(-TokB1)
|
Продовження рисунку 4.2
DelUkC1:=SoprK*(RastC*(TokP1+TokC1C2-TokB1)+RastP2*TokP2+
+RastP3*TokP3+RastP4*TokP4)
DelURC1:=SoprR*(RastC*(TokP1-
-TokB1)+RastP2*TokP2+
+RastP3*TokP3+RastP4*TokP4)
| DelUkC1:=SoprK*(RastC*(TokP1++TokP2+TokC1C2-TokB1)+
+RastP3*TokP3+RastP4*TokP4)
DelURC1:=SoprR*(RastC*(TokP1++TokP2-TokB1)+RastP3*TokP3+
+RastP4*TokP4)
| DelUkC1:=SoprK*(RastC*(TokP1++TokP2+TokP3+TokC1C2-
-TokB1)+RastP4*TokP4)
DelURC1:=SoprR*(RastC*(TokP1++TokP2+TokP3-
-TokB1)+RastP4*TokP4)
| DelUkC1:=SoprK*(RastC*(TokP1++TokP2+TokP3+TokP4+TokC1C2-
-TokB1))
DelURC1:=SoprR*(RastC*(TokP1++TokP2+TokP3+TokP4-TokB1))
| DelUkC2:=SoprK*RastC*(TokP5+
+TokP6+TokP7+TokC1C2-TokB2)
DelURC2:=SoprR*RastC*(TokP5+
+TokP6+TokP7-TokB2)
| DelUkC2:=SoprK*(RastC*(TokP6++TokP7+TokC1C2-TokB2)+
+RastP5*TokP5)
DelURC2:=SoprR*(RastC*(TokP6++TokP7-TokB2)+RastP5*TokP5)
|
Продовження рисунку 4.2
DelUkC2:=SoprK*(RastC*(TokP7++TokC1C2-TokB2)+RastP5*TokP5+
+RastP6*TokP6)
DelURC2:=SoprR*(RastC*(TokP7-
-TokB2)+RastP5*TokP5+
+RastP6*TokP6)
| DelUkC2:=SoprK*(RastC*(TokC1C2-
-TokB2)+RastP5*TokP5+
+RastP6*TokP6+RastP7*TokP7)
DelURC2:=SoprR*(RastC*(-TokB2)+
+RastP5*TokP5+RastP6*TokP6+
+RastP7*TokP7)
| DelUOR11; DelUOR12; DelUOR13; DelUOR14; DelUOR25; DelUOR26; DelUOR27; DelU11; DelU12; DelU13; DelU14; DelU25; DelU26; DelU27; DelUC1; DelUC2; DelPS1; DelPS2; DelPS3; DelPS4; DelPS5; DelPS6; DelPS7; DelPS; PA; PB; Tok; TokP
| Запись в файл FTokA: Vrem, TokA1, TokA2, TokB1, TokB2; TokA; TokB
| Запись в файл FDelU: Vrem, DelU11, DelU12, DelU13, DelU14, DelU25, DelU26, DelU27
| Запись в файл FDelP: Vrem, DelPS, PA, PB
| Закрытие файлов FTokP1, FTokP2, FTokP3, FTokP4, FTokP5, FTokP6, FTokP7, FDelP, FDelU, FTokA, FCon
|
Закінчення рисунку 4.2
Не нашли, что искали? Воспользуйтесь поиском:
|