Е ВО ВРЕМЕНИ
(ДЛЯ ЭВМ «МИР-1»)
#"5,ЖН=0 ; РНе0 ; Ненн; " ДЛ” 1=1* " 1" ДО" 
8 ВЫП" САГ 12, 1)=\ 
; ИНеЖН+А[12, Т;
АГ14,1)=Р ; ВНеРН+А[14, 1]) ; " ДЛ”К=1” ” 1” ДО” К° ВЫП” (" ВЫВ”” ЗНАЧ”” СТРО”
г+К,[ ); 5Му=0 ; 503-0 ; НЕ=НН 
; ЧИ=ВГ К, 1) ;УВ=ВГ[ 
К, 2 
; и=ВГК, 3 0120 ;"Е" К>
1"Т0"("НА”В) 
Я, МК=0 ; РК-0 ; Н=НК; " ДЛ” 1=1”П” 1” ДО"В”ВЫП” ( АГ 13, Т) =8 ; НК=
МК+А[13,1) ;АГ15, 1]=Р ;РКЕРК+АГ15,1)) ; В, Р5=, 5х(РН+РК) ; р=1 „2( „ В+уИ+
тВ-.906)/(в5х1.01)-1 
ЭХИ ” Е"АВ5(р1-р)ч1 и 3” Т0” (" НА” Э) ; 11=р
; НЕеНН
+0;" НА”Я ; 9, МКО-МЕ;РКО-РК ; 2И=(ТИ/11.6)1 , 4 ) 5И=2ИхЗ, 26; 2В=(ЧВ/З. 13)+
„& ЗВ=2Вх, 
84 51=0 ;1=0 ” ДЛ” Т=1" П 1" ДО"8”" ВЫП" ("Е” 1=1° ТО” (ТБеЛИ ; 55=
ЗИ)"ИН” (ТБеА[9 ‚ Т]*ТВ ; 55=А[9 ‚ Т)х5В) ; ЖНеА[12,1) ; МКнА[13, 
Т) уРНЗАГ15
Т) ; вк-д(15,1) Ра 5х(ЕН+РЕ) ; иО-КБхАГ7, Т) ;ч2еН АВ 1-Их1 утбхР5
х1.01-7®-МК;5=СГ 
Т) ; " Е” Т=7” Т0”(КЗ=. 03)” ИН” ( кЗ=, 006) ;”Е” НЕ<, 96” ТО” (
кЗ-0;”НА"Я! ) ;"Е” НН>2,03° ТО° (КЭ-0;”НА"Я! );”Е"НК>2.03" ТО" (КЗ-КЗх(2,
03-НЕ)/ СНК-НН) ) ;Я1.. З=КЗх(ЕК-ЕН)*Ф;"Е" 1<8” ТО” (Фо=, 5х (@+ОГ 1+1.)));”Е
*1<6° 10” (7=7И)" ИН" (2=7В); РЗА[10,Т)х2 ; БеМОх®;Ме(ОхИН+ВеНАГВ
‚ Т)+ Э-Б
=Р-,024+11х®1-12х@2)/МК;51=02 112 ;А[ 12 , Т)-М; 5МУ=ЗМИНМхИК 
; ” Е ТеЦ
т0” (БМЗ=5Му ; ТУ=Т2 ; БУ=М2х@2)); 51=0;52=0 " ДЛ" Т=1” " 1" ДО"В”ВЫП” (МК=
АГ13,1] ; р7=. 0000609 хРКОхАГ11, Т) ;М5-0;"Е” 1<8° ТО” ("ДЛ"=1+1”
" 1" ДО”
8* вЫП”М5-М5+ЕГ Т, 0-1]хА[12 
„Т) )” ИН" Ст=52) МНа 12,1) ;6=М+((0-52)хМ
5+81-ТКМ)/МК;СГ1)=Ф;"Е” 1<5” 10° ( 5ОЗ=5СЭНЫхМЕ) ; " ВЫВ”” ЗНАЧ” , 01х&
( 10
0хф) 
,Г ] ;А[ 14, 1)=0М-52 ; 51=0 ; 52=0 ; ” ДЛ”7=1” П” 1" ДО” 1” ВЫП” ( 5=А[ 12 ,5]*
АГ 180 )жЕСО, Т) ; 54=51+5 ; Бо=50+5/АГ12 ,1 ); 57=5С3-5уЗ ; ДУ=5БУ-5У ; "ВЫ
В”НЕ,[ },5у,Г ), 5У, Г ),дУ,Г ],чУ,Г ],503,Г ], МУ ;”ДЛ” е1” П А” ДО”
8"ВЫП” САГ :2, Т]=АГ13, Т) ЗА[14, Т)=АГ15, 1]) ; НН-НК;ВН=РКО 
; ННеЙКО ; РКеР
Е
эИКеВН)”РДЕ"ЧНАГЗ
Т)хСя+2, ЗЭЗАГ2 ‚ Т)+АГ1 , Т] ; Р=АГб, Т) хСН+2. ЗА(Б 1
)+АГа ‚ Т) ; 320 $Г=1930 ; КБ=, 0271 $ НН-1. 7б;А[15,8)=1,86,3,3,76,2.07,8
79,2.07,Т, 
Т, 
17.73,1.131,1. 357 ,1.198,1,159 ,1,816,1. 548 ,4,191,1.175