Реферат: Разложение сигнала в базисе Уолша

st[0]=0;

return flg;

}

void main () {

clrscr();

if ((f = fopen("int.dat", "rt"))== NULL) {

fprintf(stderr, "Входной файл отсутствует.\n");

exit (1);

}

if ((out = fopen("out.dat", "wt"))== NULL) {

fprintf(stderr, "Ошибка создания файла.\n");

exit (1);

}

if (ffread (f,ch)==1) { //Чтение длины файла

fprintf(stderr, "Ошибка при чтении файла.\n");

exit (1);

}

code=atoi(ch); //Преобразование строки в число

if (code<256) {

fprintf(stderr, "Длина меньше одного кадра\n");

exit (1); //Длина меньше одного кадра

}

for (clk1=0;clk1<code/256;clk1++) {

clrscr ();

for (clk2=0;clk2<256;clk2++) { //Чтение одного кадра

if (ffread (f,ch)==1) { //Чтение данных из файла

fprintf(stderr, "Ошибка при чтении файла.\n");

exit (1);

}