Контрольная работа: Процес квантування сигналів по рівню

}

if (mas[0]!=0)

mas[0]=r;

Label14->Caption = Label14->Caption +"x"+ (mas[0]) ;

i=0;j=0;

for (m=0;m<n1-2+r;m++)

{

for (k=r;k>=0;k--)

{

masa[i]=mas1[i];

masb[j]=mas[j];

masc[k]=masb[j]-masa[i];

for (l=0;l<n1-1+r;l++)

{

masd[l]=masa[i]+masc[k];

i++;

if (masd[l]!=masb[j]) {

mase[m]=masd[l];

masd[l]=mase[m];

}

j++;

}

}

}

for (l=0;l<n1-1+r;l++)

{

Label17->Caption=Label17->Caption + masd[l];

}

}