class Func
{
public:
unsigned int SizeOfParameterMas;
struct Parameters
{
double Fun,X,Y,Z;
};
Parameters* ParameterMas;
unsigned int SetArguments(double* x,double* y,double* z,unsigned int NumbOfFunctions,TMemo* Memo1);
unsigned int CalculateResults(void);
unsigned int PrintResults(void);
};

unsigned int Func::SetArguments(double* x,double* y,double* z,unsigned int NumbOfFunctions,TMemo* Memo1)
{
SizeOfParameterMas=NumbOfFunctions;
ParameterMas=new Parameters[SizeOfParameterMas];
//memcpy(&ParameterMas->X,x,SizeOfParameterMas*sizeof(double));
//memcpy(&ParameterMas->Y,y,SizeOfParameterMas*sizeof(double));
//memcpy(&ParameterMas->Z,z,SizeOfParameterMas*sizeof(double));
for(register unsigned int i=0;i<SizeOfParameterMas;i++)
{
ParameterMas[i].X=x[i];
ParameterMas[i].Y=y[i];
ParameterMas[i].Z=z[i];
Memo1->Lines->Add("X["+AnsiString(i+1)+"]="+AnsiString(ParameterMas[i].X));
Memo1->Lines->Add("Y["+AnsiString(i+1)+"]="+AnsiString(ParameterMas[i].Y));
Memo1->Lines->Add("Z["+AnsiString(i+1)+"]="+AnsiString(ParameterMas[i].Z));
}
return 0;
}