double fun(double x[],double *y)
{ int i,j; double av;
/found/
av=0.0;
/found/
for(i=0; i<N; i++)
av=av+x[i]/N;
for(i=j=0; i<N; i++)
/found/
if(x[i]>av) y[j++]= x[i];
y[j]=-1;
return av;
}
/found/
double fun (int m)
{ double y=0, d;
int i;
/found/
for(i=100;i<=m;i+=100)
{d=(double)i*(double)i;
y+=1.0/d;
}
return(y);
}
void fun(STU a[], STU *s)
{
int i;
*s=a[0];
for(i=0;i<N;i++)
if(s->s>a[i].s)
*s=a[i];
}