Изменить программу (программа считывает исходные данные из файла. Процедура обработки находится в юните отличном от основного)

//---------------------------------------------------------------------------
#include <math.h>
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
float  P(float ( *F1)(float),float (*F2) (float),float  Z[],float sum) //len-dlinna massiva Z
{
int i;// chetchik.
sum=0;
for (i=0;i<5;i++)
{  if ((*F1)(Z[i])<=(*F2)(Z[i]))
 
  sum+=Z[i];
  
 }
return sum;
 
}
 
float F1(float x)
{
return cos(x);
}
float F2(float x)
{
return  sin(x);
}
 
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
float A[5][5];
float summa;
int i,j;//chetchiki
float rab[5];//rabochii massiv
 
 for (i=0;i<5;i++)
 for (j=0;j<5;j++)
 A[i][j]=StrToFloat( StringGrid1->Cells[j][i]);
 
 
for (i=0;i<5;i++)
{
 for (j=0;j<5;j++)
 rab[i]=A[i][j];
P(F1,F2,rab,summa);
 
 for (i=0;j<5;j++)
 StringGrid2->Cells[j][0]=FloatToStr(summa);
 
  }
  }
//---------------------------------------------------------------------------