Курсовая работа: Поиск максимума одной функции многих переменных методом покоординатного спуска и с помощью метода
for(j=1;j<n-1;j++)
{
f1[j]=pow(n,(2./q-1./p))*(pow(e,(1./p-1))*pow(fabs(x[j][0]-c),(p-1))*w
*sgn(x[j][0]-c)-2.*pow(w,(1./q-1))*r[j])/(w*w); //производная исх. функции по x[j][0] в точке с координатами x[i][0] i=0..n-1 на k-ом приближении
// cerr<<f1[j]<<"\n";
for(a=0;a<bb;a++)
if(aa[a]==j) break;
if(a!=bb) continue;
if (fabs(f1[j])>fabs(f1[MAX])) MAX=j;
}
// т.к. x[0]=0 и x[n-1]=1 - cosnt
mm=0;ss=0;
for(i=0;;i++)
{
if (mm==0) z[0]=100000000./pow(1.2,i);//шаг
if(mm==1)
{
z[0]=-1000000000./pow(1.2,ss);
ss++;
}
/*if(z[0]<0.000000000000001)
{
z[0]=-0.5/pow(1.5,mm);
mm++;
}*/
for(a=0;a<n;a++)
r1[a]=0;
w1=0;e1=0;
for(a=0;a<n;a++)