\/* str6 *\/
\n\/* \u0412\u044b\u0440\u0430\u0431\u043e\u0442\u043a\u0430 \u0442\u0435\u043f\u043b\u0430 *\/
\n\/* \u041c\u043e\u043b\u0434\u0430\u0432\u0438\u0437\u043e\u043b\u0438\u0442. \u0433. \u0422\u0438\u0440\u0430\u0441\u043f\u043e\u043b\u044c *\/<\/p>\n
#include <stdio.h>
\n#include <time.h>
\n#include <math.h>
\n#include <string.h>
\n#include <stdlib.h>
\n#include «titlet.h»
\n#include «d6.h»
\n#define ANAL 1<\/p>\n
void d6(void);
\nvoid grafr();
\nfloat pp3();
\nvoid vxd1();
\nvoid vost1();
\nvoid ocinf();
\nvoid uchet();
\nvoid fdt();
\nvoid mes();
\nvoid sv();
\nvoid teplo();
\nlong lsee();
\nstruct zps mo6[]={
\n{&d6,60,RAVR6,3,IVR6,IVD6,IVT6,»mainnsi»,»d6″,0}
\n};
\n#include «bibt.c»
\n#include «blog.c»
\nchar far *tg = (char far *) 328;<\/p>\n
main(argc,argv)
\nint argc;
\nchar *argv[];
\n{
\nint prog,i,f1;<\/p>\n
static int *AIM6[4]={IVR6,IVD6,IVT6,NULL};
\nstatic int INT6[3]={60,60,60};<\/p>\n
*tg=’0′;
\nswitch(argc){
\ncase 7:
\npar5=atoi(argv[6]);
\ncase 6:
\npar4=atoi(argv[5]);
\ncase 5:
\ncase 4:
\notmn=atoi(argv[3]);
\ncase 3:
\npar1=atoi(argv[2]);
\ncase 2:
\nprog=atoi(argv[1]);
\n}<\/p>\n
vost1(GE,1);<\/p>\n
vost(GN6,K6);
\npinf(AIM6,INT6);<\/p>\n
\/***********************************\/
\n\/* \u0424\u043e\u0440\u043c\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u043c\u0430\u0441\u0441\u0438\u0432\u0430 \u044d\u043d\u0442\u0430\u043b\u044c\u043f\u0438\u0438 *\/<\/p>\n
if((f1=_open(«ental»,4))==-1)
\n{
\nsprintf(buf_mes,»%s: vost:\u043d\u0435 \u043e\u0442\u043a\u0440\u044b\u0442 \u0444\u0430\u0439\u043b %s»,
\nname_prog,»ental»);
\nmes(buf_mes,1);<\/p>\n
}<\/p>\n
_read(f1,ent,sizeof(ent));
\n_close(f1);<\/p>\n
\/***********************************\/<\/p>\n
if(par1==4 || par1==3 )
\n{
\nset_data(IMR6, MPR6, KOLS6);
\nset_data1(IMD6, MPD6, KOLD6);
\nset_data1(IMT6, MPT6, KOLT6);
\nlogr(IMR6,MTPR6,FMTPR6,KOLS6,NEDR6,IVR6,RAVR6);
\nloga(IMD6,MTPD6,FMTPD6,KOLD6,NEDD6,IVD6);
\nloga(IMT6,MTPT6,FMTPT6,KOLT6,NEDT6,IVT6);
\n}<\/p>\n
PZAP(mo6,1,otmn,argv[4]);<\/p>\n
switch (prog){
\ncase 0:
\ncase 1:
\nif(*tg!=’0′) { *tg=’0′;exit(1);}
\n\/*printf(«d6»);*\/
\nset_data(IMR6, MPR6, KOLS6);
\nset_data1(IMD6, MPD6, KOLD6);
\nset_data1(IMT6, MPT6, KOLT6);<\/p>\n
if(par1==0 || (par1==3 && par2==2))
\nlogr(IMR6,MTPR6,FMTPR6,KOLS6,NEDR6,IVR6,RAVR6);<\/p>\n
if(par1==0 || (par1==3 && par2==2) ||
\n(par1==4 && par2==2) || par1==2)<\/p>\n
{ loga(IMD6,MTPD6,FMTPD6,KOLD6,NEDD6,IVD6);
\nloga(IMT6,MTPT6,FMTPT6,KOLT6,NEDT6,IVT6);
\n}<\/p>\n
d6();
\ndefault: break;
\n}
\n\/* printf(«str6:end\\n»);*\/<\/p>\n
exit(0);
\n}<\/p>\n
void sv()
\n{
\nstatic struct st GE[1]={{«E»,E,34}};
\nint kcyt,kcy1,s17,vrem,i;
\nstruct tm *p;
\nlong int t;
\ntime(&t);
\np=localtime(&t);
\nE[1]=p->tm_sec;
\nE[2]=p->tm_min;
\nE[3]=p->tm_hour;
\nE[4]=p->tm_yday+1;
\nE[5]=E[3]*60+E[2];
\nE[6]=p->tm_mday;
\nE[7]=p->tm_mon+1;
\nE[8]=p->tm_year%100;
\nE[10]=KCYTOK;
\nE[9]=minu(E[5]);
\nE[12]=KOLSM;
\nfor(i=0;i<E[12];i++)
\nE[13+i]=KSM[i];
\nE[11]=ncm(E[5]);
\nvxd1(GE,1);
\n}<\/p>\n
\/*\t\t\t d6.c *\/<\/p>\n
void d6(void)<\/p>\n
{
\nint sr,i;
\nint RQ = 0;<\/p>\n
switch(par1){
\ncase 0:<\/p>\n
if(prov(IVR6,RAVR6,TRCR6)==1) break;
\nif(prov(IVR6,RAVQ6,TRCQ6)==1) break;
\nA6:
\nanal(RABD6,IMD6,LSID6,KOLD6,IVD6,RAVD6);
\nint1(IMD6,IVD6,LSID6,RAVD6,RABD6,REZD6,KOLD6,RAVR6,1,
\nFNSID6,NSID6);<\/p>\n
for(i=0; i<4; i++)
\nIMT6[ SV_iis[i][2]] = IMT6[ SV_iis[i][1]] — (IMR6[ SV_iis[i][0]]\/TRCR6[0]);<\/p>\n
anal(RABT6,IMT6,LSIT6,KOLT6,IVT6,RAVT6);
\nint1(IMT6,IVT6,LSIT6,RAVT6,RABT6,REZT6,KOLT6,RAVR6,0);<\/p>\n
if(par1==4 && par2==2) break;
\nif(par1==4 && par2==1) goto U6;<\/p>\n
\/* ****************************************************************
\n\u0424\u043e\u0440\u043c\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u0433\u043e \u043c\u0430\u0441\u0441\u0438\u0432\u0430 TRCR6 *\/<\/p>\n
for(i=0; i<KOLC6; i++)
\nTRCR6[i+1] = IMR6[i];<\/p>\n
\/* **************************************************************** *\/<\/p>\n
U6:
\nuchet(TRCR6, RABR6,KOLC6);
\nintrv(REZR6,RABR6,IVR6,RAVR6,KOLC6,SMR6,0,
\nNULL,NULL,0,»0″,GOD6);<\/p>\n
if(par1==4 && par2==1) goto UC1;
\nteplo(KOL_W,&RQ,IMR6,LSIT6,TRSQ6,SV6_W,KFB);
\nteplo(KOL_D,&RQ,IMR6,LSIT6,TRSQ6,SV6_D,KFD);
\nteplo(KOL_M,&RQ,IMR6,LSIT6,TRSQ6,SV6_M,KFM);
\nental(LSID6,IMR6,TRSQ6,SEN6,KOL_P);<\/p>\n
\/* ***********************************************************<\/p>\n
\u0424\u043e\u0440\u043c\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0434\u043e\u043f\u043e\u043b\u043d\u0438\u0442\u0435\u043b\u044a\u043d\u043e\u0433\u043e \u043c\u0430\u0441\u0441\u0438\u0432\u0430 TRCQ6 \u043f\u043e \u0444\u043e\u0440\u043c\u0443\u043b\u0430\u043c
\n\u0441\u043b\u043e\u0436\u0435\u043d\u0438\u044f \u0438 \u0432\u044b\u0447\u0438\u0442\u0430\u043d\u0438\u044f *\/<\/p>\n
TRCQ6[1] = TRSQ6[1] — TRSQ6[3];
\nTRCQ6[2] = TRSQ6[4] — TRSQ6[6];
\nTRCQ6[3] = TRSQ6[7] — TRSQ6[9];
\nTRCQ6[4] = TRSQ6[10] — TRSQ6[12];
\nTRCQ6[5] = TRSQ6[13] — TRSQ6[14];
\nTRCQ6[6] = TRSQ6[15] — TRSQ6[16];
\nTRCQ6[7] = TRSQ6[23] — TRSQ6[24];
\nTRCQ6[8] = TRSQ6[25] — TRSQ6[26];
\nTRCQ6[9] = TRSQ6[27] — TRSQ6[28];
\nTRCQ6[10] = TRSQ6[29] — TRSQ6[30];
\nTRCQ6[11] = TRSQ6[37] — TRSQ6[38];
\nTRCQ6[12] = TRSQ6[39] — TRSQ6[40];
\nTRCQ6[13] = TRSQ6[41] — TRSQ6[42];<\/p>\n
TRCQ6[15] = TRSQ6[45] — TRSQ6[46];
\nTRCQ6[16] = TRSQ6[49] — TRSQ6[50];
\nTRCQ6[17] = TRSQ6[51] — TRSQ6[52];
\nTRCQ6[18] = TRSQ6[53] — TRSQ6[54];
\nTRCQ6[19] = TRSQ6[55] — TRSQ6[56];
\nTRCQ6[20] = TRSQ6[57] — TRSQ6[58];
\nTRCQ6[21] = TRSQ6[59] — TRSQ6[60];
\nTRCQ6[22] = TRSQ6[61] — TRSQ6[62];
\nTRCQ6[23] = TRSQ6[63];
\nTRCQ6[24] = TRSQ6[64];
\nTRCQ6[25] = TRSQ6[65];
\nTRCQ6[26] = TRSQ6[66];
\nTRCQ6[27] = TRSQ6[1] -TRSQ6[2];
\nTRCQ6[28] = TRSQ6[4] -TRSQ6[5];
\nTRCQ6[29] = TRSQ6[7] -TRSQ6[8];
\nTRCQ6[30] = TRSQ6[10] -TRSQ6[11];
\nTRCQ6[31] = TRSQ6[17] — TRSQ6[18];
\nTRCQ6[32] = TRSQ6[19] — TRSQ6[20];
\nTRCQ6[33] = TRSQ6[21] — TRSQ6[22];
\nTRCQ6[34] = TRSQ6[43] — TRSQ6[44];
\nTRCQ6[35] = TRSQ6[47] — TRSQ6[48];
\nTRCQ6[36] = TRSQ6[31] — TRSQ6[32];
\nTRCQ6[37] = TRSQ6[33] — TRSQ6[34];
\nTRCQ6[38] = TRSQ6[35] — TRSQ6[36];
\nTRCQ6[41] = TRSQ6[67];
\nTRCQ6[42] = TRSQ6[68];
\nTRCQ6[43] = TRSQ6[69];
\nTRCQ6[44] = TRSQ6[70];<\/p>\n
TRCQ6[14] = TRCQ6[33] — TRCQ6[34];
\nTRCQ6[39] = TRCQ6[16] + TRCQ6[17] + TRCQ6[18];
\nTRCQ6[40] = TRCQ6[19] + TRCQ6[20] + TRCQ6[21] + TRCQ6[22];
\nTRCQ6[45] = TRCQ6[27] + TRCQ6[31];
\nTRCQ6[46] = TRCQ6[28] + TRCQ6[29] + TRCQ6[30] + TRCQ6[32];
\nTRCQ6[47] = TRCQ6[12] + TRCQ6[13] + TRCQ6[15] + TRCQ6[34];
\nTRCQ6[48] = TRCQ6[16] + TRCQ6[17] + TRCQ6[18] + TRCQ6[33];
\nTRCQ6[48] += TRCQ6[35] + TRCQ6[37];
\nTRCQ6[49] = TRCQ6[19] + TRCQ6[20] + TRCQ6[21] + TRCQ6[22];
\nTRCQ6[49] += TRCQ6[38];
\nTRCQ6[50] = TRCQ6[11] + TRCQ6[12] + TRCQ6[13] + TRCQ6[14];
\nTRCQ6[50] += TRCQ6[16] + TRCQ6[17] + TRCQ6[18] + TRCQ6[19];
\nTRCQ6[50] += TRCQ6[20] + TRCQ6[21] + TRCQ6[22] + TRCQ6[27];
\nTRCQ6[50] += TRCQ6[28] + TRCQ6[29] + TRCQ6[30] + TRCQ6[31];
\nTRCQ6[50] += TRCQ6[32] + TRCQ6[33] + TRCQ6[34] + TRCQ6[35];
\nTRCQ6[50] += TRCQ6[36] + TRCQ6[37] + TRCQ6[38] + TRCQ6[41];
\nTRCQ6[50] += TRCQ6[42] + TRCQ6[43] + TRCQ6[44] ;
\nTRCQ6[51] = TRCQ6[1 ] + TRCQ6[ 2] + TRCQ6[ 3] + TRCQ6[ 4];
\nTRCQ6[51] += TRCQ6[ 5] + TRCQ6[ 6] + TRCQ6[ 7] + TRCQ6[ 8];
\nTRCQ6[51] += TRCQ6[ 9] + TRCQ6[10] + TRCQ6[11] + TRCQ6[12];
\nTRCQ6[51] += TRCQ6[13] + TRCQ6[14] + TRCQ6[16] + TRCQ6[17];
\nTRCQ6[51] += TRCQ6[18] + TRCQ6[19] + TRCQ6[20] + TRCQ6[21];
\nTRCQ6[51] += TRCQ6[22] + TRCQ6[23] + TRCQ6[24] + TRCQ6[25];
\nTRCQ6[51] += TRCQ6[26] + TRCQ6[34] + TRCQ6[35];
\n\/* ************************************************************ *\/<\/p>\n
UC1:
\nuchet(TRCQ6,RABQ6,KOLCQ6);
\ngrafr(GQ6,RAVR6,KOLNQ6);
\nintrv(REZQ6,RABQ6,IVR6,RAVQ6,KOLCQ6,SMQ6,1,
\nGQ6,SOTQ6,KOLNQ6,FNSIQ6,GODQ6);
\nvihod(IVR6,RAVR6,1,TRSR6,TRCR6,KOLC6,IMR6,KOLS6);
\nvihod(IVR6,RAVQ6,0,TRSQ6,TRCQ6,KOLCQ6);
\nvxd(GN6,K6);
\nbreak;
\ncase 1:
\nrasg(FNSIQ6,REZQ6,GQ6,IVR6,RAVQ6,KOLNQ6,0,SOTQ6,KOLCQ6,
\nSMQ6,0);
\nvxd(GN6,K6);
\nbreak;
\ncase 2:
\nvost1(GND6,KD6);
\npusk(REZQ6,SMQ6,RAVQ6,0,IVR6,IMR6,KOLCQ6,KOLS6,1,
\nFNSIQ6,GQ6,KOLNQ6,SOTQ6,GODQ6);
\npusk(REZR6,SMR6,RAVR6,1,IVR6,IMR6,KOLC6,KOLS6,0,
\n«0»,NULL,0,NULL,GOD6);
\npuska(REZD6,IVD6,IMD6,RAVD6,LSID6,KOLD6,RAVR6,1,
\nFNSID6,NSID6);
\npuska(REZT6,IVT6,IMT6,RAVT6,LSIT6,KOLT6,RAVR6,0);
\nvxd(GN6,K6);
\nbreak;
\ncase 3:
\nTRCQ6[0]=pp3(par4,par3,RAVQ6);
\nif(datch(IVR6,RAVR6,TRCR6,TRS,IMR6,KOLS6)==1) break;
\ngoto A6;<\/p>\n
case 4:
\nif((sr=sredn(TRCQ6,IVR6,RAVQ6,REZQ6,KOLCQ6))==1) break;
\nif((sr=sredn(TRCR6,IVR6,RAVR6,REZR6,KOLC6))==1) break;
\nif(sr==2) goto U6;
\nocinf(IVR6,IMR6,KOLS6);
\ngoto A6;
\ncase 6:
\nkorag(REZD6,FNSID6,RAVD6,NSID6,KOLD6);
\nvost1(GND6,KD6);
\nvxd(GN6,K6);
\n}
\n}<\/p>\n","protected":false},"excerpt":{"rendered":"
\/* str6 *\/ \/* \u0412\u044b\u0440\u0430\u0431\u043e\u0442\u043a\u0430 \u0442\u0435\u043f\u043b\u0430 *\/ \/* \u041c\u043e\u043b\u0434\u0430\u0432\u0438\u0437\u043e\u043b\u0438\u0442. \u0433. \u0422\u0438\u0440\u0430\u0441\u043f\u043e\u043b\u044c *\/<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[37],"tags":[],"_links":{"self":[{"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/posts\/2256"}],"collection":[{"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=2256"}],"version-history":[{"count":1,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/posts\/2256\/revisions"}],"predecessor-version":[{"id":2257,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/posts\/2256\/revisions\/2257"}],"wp:attachment":[{"href":"https:\/\/studentpmr.ru\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=2256"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=2256"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=2256"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}