Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

SOME / 1 / MY_DIPLO / WORK1

.CPP
Скачиваний:
8
Добавлен:
16.04.2013
Размер:
20 Кб
Скачать
РПаЎ±б;юя	юяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяэяяяюяяя	

юяяяюяяя !"#$%юяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяRoot Entryяяяяяяяя	АF†оyьйрє@CompObjяяяяяяяяяяяяbWordDocumentяяяяяяяяѓ?ObjectPoolяяяя†БHыйрє†БHыйрєюяяя	
юяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяюя
яяяя	АFДокумент Microsoft Word 6.0
MSWordDocWord.Document.6;юя	юя
а…џтщOh«‘+'іЩ0Њ
Ь$H
lђґ
Шь 	DhяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяC:\WINWORD\TEMPLATE\NORMAL.DOTPavel  GangenkoPavel  Gangenko@†#27лє@†Ќн]ЬҐe5Аe  ѓ? :v:vv:v:v:v:v:`;`;`;`;`;`;
j;F`;Д>9°;°;°;°;°;°;°;°;j=l=l=l=†=ђ>ђ¦>э>TQ?2Д>v:==°;°;====Д>==v:v:°;°;========v:°;v:°;j=Љ:PЪ:†v:v:v:v:°;Ќj===-==     
                                                     приложение

1. ТЕКСТ ПРОГРАММЫ “ WORK 1 ”(Вычисление значений частот без усреднения по периодам).

#include"stdio.h"
#include"stdlib.h"
#include"dos.h"
int input[95],A_M,newA_M;
int length=30;
FILE *out,*srmas;

//********************************************
/* maximum detecting */

int max(start,end)
  int start,end;
{
  int i,j,a,f1,m1=0;
  i=start;
  while(i<=end)
   { a=0;
     for(j=0;j<=3;j++)
      a=a+input[i+j];
     if(a>m1)
      { m1=a;
          f1=i;
      }
     i++;
   }
  printf("\nmax1(%d)=%d ",f1,input[f1]);
  return(f1);
}


//********************************************
/* sinchronization */

sinhro( )
{ int m,n,k,razn;
  newA_M=A_M+length;
  if(newA_M>90)
    newA_M=newA_M-90;
  m=newA_M+1;
  n=newA_M+3;
  k=newA_M+4;
  switch(newA_M)
   { case 90:m=m-90;
     case(89||88):n=n-90;
     case 87:k=k-90;
   }
  razn=(input[newA_M]+input[m])-(input[n]+input[k]);
  if((razn>30)||(razn<(-30)))
   { if(razn<(-30))
      { length=length+1;
	newA_M=newA_M+1;
      }
     else
      { if(razn>30)
	{ length=length-1;
	  newA_M=newA_M-1;
	}
      }
   }
printf("length=%d ",length);
return(0);
}




//********************************************
/* count */

int countm( )
 {struct time t;
  int d,e,g,adr,mg[6]={5,5,5,5,5,5};
  float c;
  gettime(&t);
  out=fopen("outr3","at");
  fprintf(out,"\n%2d:%02d:%02d.%02d ",t.ti_hour,t.ti_min,t.ti_sec,t.ti_hund);
  g=length%5;
  if(length<30)
   {switch(g)
    { case 4:mg[4]=4;
	     break;
     case 3:mg[4]=4;
	    mg[3]=4;
	    break;
    }
   }
  if(length>30)
   {switch(g)
    { case 1:mg[4]=6;
	         break;
       case 2:mg[3]=6;
	       mg[4]=6;
	       break;
    }
   }
  adr=A_M;
  for(d=0;d<=5;d++)
   { c=0.0;
     for(e=1;e<=(mg[d]-2);e++)
      { adr=adr+1;
	if(adr>90)
	adr=adr-90;
	c=c+input[adr];
      }
     adr=adr+2;
     fprintf(out,"F(%d)=%5.2f ",(d+1),c/(mg[d]-2));
   }
  A_M=newA_M;
  fclose(out);
  return(0);
}

//********************************************
/* imitator - main programm */

main ( )
{ struct time t;
  int count,x,c,n,v,i,j=0,k=0,z,A_M1,tr1=0;
  float l=0;
  out=fopen("outr3","wt");
  srmas=fopen("srmas3","wt");
  fclose(out);
for(i=1;i<=40;i++)
  {for(count=1;count<=6;count++)
   {switch(count)
   { case 1:n=55;
	    v=57;
	    break;
    case 2:n=60;
	   v=62;
	   break;
    case 3:n=65;
	   v=67;
	   break;
    case 4:n=70;
	   v=72;
	   break;
  

  case 5:n=75;
	   v=77;
	   break;
    case 6:n=128;
	   v=130;

    }
    z=4;
    if((count==4)&&(i>=4)) z=5;
    x=rand();
    while ((x<n)||(x>v))
    x=rand();
    if(j==(length))
    {k++;
     if(k==3)
     {A_M=max(1,40);
      A_M1=max(41,60);
      length=A_M1-A_M;
      printf("L=%d",length);
      sinhro();
      countm();
      }
      else if(k>3)
       {sinhro();
         countm();
       }
     j=0;
    }
     j++;
     tr1++;
     if(tr1>90) tr1=tr1-90;
    input[tr1]=x;
    l=l+x;
    for(c=1;c<=z;c++)
    { x=rand();
      while ((x>v)||(x<n))
      x=rand();
      if(j==(length))
       {k++;
	if(k==3)
	 {A_M=max(1,40);
	  A_M1=max(41,60);
	  length=A_M1-A_M;
	  printf("L=%d",length);
	  sinhro();
	  countm();
	}
      else if(k>3)
       {sinhro();
	countm();
       }
     j=0;
    }
      j++;
      tr1++;
      if(tr1>90) tr1=tr1-90;
      input[tr1]=x;
      l=l+x;
   }
   fprintf(srmas,"%5.2f ",(l/(z+1)));
   l=0;
  }
}
fclose(srmas);
}






2. ТЕКСТ ПРОГРАММЫ “ WORK 2 ” (Вычисление значений частот с усреднением по шести периодам).

#include"stdio.h"
#include"stdlib.h"
#include"dos.h"
int input[95],A_M,newA_M;
int length=30;
float rezgl[6];
FILE *out,*srmas;

//********************************************
/* maximum detecting */

int max(start,end)
  int start,end;
{
  int i,j,a,f1,m1=0;
  i=start;
  while(i<=end)
   { a=0;
     for(j=0;j<=3;j++)
      a=a+input[i+j];
     if(a>m1)
      { m1=a;
	f1=i;
      }
     i++;
   }
  printf("\nmax1(%d)=%d ",f1,input[f1]);
  return(f1);




}

//********************************************
/* sinchronization */

sinhro( )
{ int m,n,k,razn;
  newA_M=A_M+length;
  if(newA_M>90)
    newA_M=newA_M-90;
  m=newA_M+1;
  n=newA_M+3;
  k=newA_M+4;
  switch(newA_M)
   { case 90:m=m-90;
     case(89||88):n=n-90;
     case 87:k=k-90;
   }
  razn=(input[newA_M]+input[m])-(input[n]+input[k]);
  if((razn>30)||(razn<(-30)))
   { if(razn<(-30))
      { length=length+1;
	newA_M=newA_M+1;
      }
     else
      { if(razn>30)
	{ length=length-1;
	  newA_M=newA_M-1;
	}
      }
   }
printf("length=%d ",length);
return(0);
}



//********************************************
/* count */

int countm( )
 {struct time t;
  int d,e,g,adr,mg[6]={5,5,5,5,5,5};
  float c;
    g=length%5;
  if(length<30)
   {switch(g)
    { case 4:mg[4]=4;
	     break;
     case 3:mg[4]=4;
	    mg[3]=4;
	    break;
    }
   }
  if(length>30)
   {switch(g)
    { case 1:mg[4]=6;
	    break;
     case 2:mg[3]=6;
	    mg[4]=6;
	    break;
    }
   }
  adr=A_M;
  for(d=0;d<=5;d++)
   { rezgl[d]=0.0;
     c=0.0;
     for(e=1;e<=(mg[d]-2);e++)
      { adr=adr+1;
	if(adr>90)
	adr=adr-90;
	c=c+input[adr];
      }
     adr=adr+2;
     rezgl[d]=c/(mg[d]-2);
    }
  A_M=newA_M;
  fclose(out);
  return(0);
}

//********************************************
/* imitator - main programm */

main ( )
{ struct time t;
  int count,x,c,n,v,i,j=0,j1,k=0,z,A_M1,tr1=0,six=0;
  float l=0,rez[6]={0,0,0,0,0,0};
  out=fopen("outr2","wt");
  srmas=fopen("srmas2","wt");
  fclose(out);
for(i=1;i<=40;i++)
  {for(count=1;count<=6;count++)
   {switch(count)
   { case 1:n=55;
	    v=57;
	    break;
    case 2:n=60;
	   v=62;
	   break;
    case 3:n=65;
	   v=67;
	   break;
    case 4:n=70;
	   v=72;
	   break;
    case 5:n=75;
	   v=77;

	   break;
    case 6:n=128;
	   v=130;

    }
    z=4;
    if((count==4)&&(i>=4)) z=5;
    x=rand();
    while /*(x!=n)*/((x<n)||(x>v))
    x=rand();
    if(j==(length))
    {k++;
     if(k==3)
     {A_M=max(1,40);
      A_M1=max(41,60);
      length=A_M1-A_M;
      printf("L=%d",length);
      sinhro();
      countm();
      six++;
      for(j1=0;j1<=5;j1++)
      {rez[j1]=rez[j1]+rezgl[j1];
      }
     }
      else if(k>3)
       {sinhro();
	countm();
	six++;
	for(j1=0;j1<=5;j1++)
	{rez[j1]=rez[j1]+rezgl[j1];
	}
	if(six==6)
	{gettime(&t);
	 out=fopen("outr2","at");
	 fprintf(out,"\n%2d:%02d:%02d.%02d ",t.ti_hour,t.ti_min,t.ti_sec,t.ti_hund);
	
 for(j1=0;j1<=5;j1++)
	 {printf("%f ",rez[j1]);
	  fprintf(out,"F(%d)=%5.2f ",(j1+1),rez[j1]/6);
	  rez[j1]=0;}
	  six=0;
	}
       }
     j=0;
    }
     j++;
     tr1++;
     if(tr1>90) tr1=tr1-90;
    input[tr1]=x;
    l=l+x;
    for(c=1;c<=z;c++)
    { x=rand();
      while /*(x!=n)*/((x>v)||(x<n))
      x=rand();
      if(j==(length))
       {k++;
	if(k==3)
	 {A_M=max(1,40);
	  A_M1=max(41,60);
	  length=A_M1-A_M;
	  printf("L=%d",length);
	  sinhro();
	  countm();
	  six++;
	  for(j1=0;j1<=5;j1++)
	   rez[j1]=rez[j1]+rezgl[j1];
	  }
      else if(k>3)
       {sinhro();
	countm();
	six++;
	
for(j1=0;j1<=5;j1++)
	 rez[j1]=rez[j1]+rezgl[j1];
	if(six==6)
	{gettime(&t);
	 out=fopen("outr2","at");
	 fprintf(out,"\n%2d:%02d:%02d.%02d ",t.ti_hour,t.ti_min,t.ti_sec,t.ti_hund);
	 for(j1=0;j1<=5;j1++)
	 {fprintf(out,"F(%d)=%5.2f ",(j1+1),rez[j1]/6);
	  rez[j1]=0;}
	  six=0;
	}
       }
     j=0;
    }
      j++;
      tr1++;
      if(tr1>90) tr1=tr1-90;
      input[tr1]=x;
      l=l+x;
   }
   fprintf(srmas,"%5.2f ",(l/(z+1)));
   l=0;
  }
}
fclose(srmas);
}




¤ѓ.ҐИA¦Љ§ЉЁ7©nРПаЎ±б;юя	юяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяSummaryInformation(яяяяяяяяяяяяјяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяйрє@†Ґъмйрє@јБ
Microsoft Word 6.02яяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяEFeћЅ    4 ьчуьсьсьсьпucUЃZЃc	UЃZЃ[ЃcZЃcFGќћ°ГУнь>VWj{}’ќ­·Одт"'P^`ab‘§ЁІДЩйя
ыыыххыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыhh,
):Oi~ѓёЦк';Ocfnsђ›ќћџ ЎРЬЭль!,;V¤ІВРжу		"	ыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыh-"	(	-	=	K	a	r	‰	љ	©	Ї	ґ	ї	У	Я	ю	

*
;
C
S
‡
Њ
љ
©
¶
ё
№
и
"N[v”Ј¶Чйы#ыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыh-#-8IS^oy„‡€—Ў¬ѕЙКРЩщ
 
.
B
L
Z
o
†
ќ
є
К
Ъ
в
х
#-3=Iew‚Ёыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыh-ЁГУйц&:Tanq„–ЎЄґєЕТп;CGIXZ[\]^_`јЅПвт+ыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыххыыыыыыhh,+=>m…†™Є¬БМЬжэ!/6>HMv„…†‡€Љ‹єРСЫн(6DRcx’§¬быыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыh-бя,>FPdxЊЏ—њ№ДЖЗИЙш$ITdt‚ҐєИФЪЯпэ4BNTYdыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыh-dx‹—¶ЙХвуы&,:IVXY€§Ё±Вч4Rat•§№ДРблц-7BS]^ыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыh-^i{†‡Ќ–¶Дзх	!6MdЃ‘Ў®Йлуъ
*2HehtѓћмоO^hkt~„ыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыh-„Ћљ¶ИУйщ.DQ[mЃ•ЇјЙУл
"4?GI^{‡–±яGV`clv|‡”±Еыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыh-ЕТЧэ 	         ыыыыыыыыыыхыhhK"@ся"
НормальныйZЃac&A@тяЎ&Шрифт абзаца по умолчанию   	яяяя
 яя яя яя яя яя яя яя яя яя	 яя
 яя яя яя
bЎ*‡	Ё`
ЉЙы^оI //\/	
4 
"	#Ё+бd^„Е  ЌдгчммсЎ;0x#-+'''`.,,RCAUTHORCOMMENTS
CREATEDATEEDITTIMEFILENAMEFILESIZEKEYWORDSLASTSAVEDBYNUMCHARSNUMPAGESNUMWORDS	PRINTDATEPRIVATERDREVNUMSAVEDATESUBJECTTCTEMPLATETITLEXE
ALPHABETICARABICCAPSCARDTEXT
CHARFORMAT
DOLLARTEXTFIRSTCAPHEXLOWERMERGEFORMATORDINALORDTEXTROMANUPPERABSROUNDDEFINEDINTANDFALSEMAXMINMODAVERAGECOUNTNOTORPRODUCTIFSIGNSUMTRUE-Pavel  GangenkoD:\WORK\MY_DIPLO\WORK1.CPPя@Epson LX-800LPT1:EPSON9Epson LX-800
DLf	ююэрђъЋАъЕяяЃЃяяяяяяяяяяяяяяяяEpson LX-800
DLf	ююэрђъЋАъЕяяЃЃяяяяяяяяяяяяяяяяЂIIЂII9ђМTimes New Roman CyrђSymbol&ђМArial Cyr"€Д©ЙЛL
†H
†MѓY2Pavel  GangenkoPavel  GangenkoРПаЎ±б;юя	юяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяя
Соседние файлы в папке MY_DIPLO