float F (float x,float A); - да здесь. теперь ты ее сможешь использовать в любой функции идущей после объявления . Некоторые компиляторы пускают и без объявления, но это не так.
void __fastcall TForm1::Button1Click(TObject *Sender)
{
float A,x,y;
float ymin,ymax,xmin,xmax;
for (A=1;A<=3;A++)
{
ymax=-1e10;
ymin=1e10;
ListBox1->Items->Add("A="+FloatToStr(A));
for (x=0.5;x<=2;x=x+0.1) // здесь ; тебе не нужна. это будет просто нулевой for
{
y=F(x,A);
if(y>ymax)
{
ymax=y;
xmax=x;
}
if(y<ymin)
{
ymin=y;
xmin=x;
}
}
ListBox2->Items->Add("Xmax="+FloatToStr(xmax)+" Ymax="+FloatToStr(ymax));
ListBox3->Items->Add("Xmin="+FloatToStr(xmin)+" Ymin="+FloatToStr(ymin));
}
} // вот этой скобки у тебя нехватало
Пробуй
