compaq

Спасибо всё работает но я думал что она у меня будет выдавать такое
X=0.5 Y=0.3
X=0.6 y= 1.4
А он у меня выдаёт только X=0.5 Y=0.3 а как вывести остальные.
И так далее до 2 у мне просто задание составить таблицу значений заданной функции x*x-A*sin(x) Найти максимальное и минимальное значение функции соответствующие им значение аргументов.
Если не трудно подскажите а то я не пойму почему не получается.

void __fastcall TForm1::Button1Click(TObject *Sender)
{
float A,x,y;
float ymin,ymax,xmin,xmax;

for (A=1;A<=1;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));
ListBox4->Items->Add("X="+FloatToStr(x)+" Y="+FloatToStr(y));
}
} // âîò ýòîé ñêîáêè ó òåáÿ íåõâàòàëî


float F (float x,float A)
{
return x*x-A*sin(x);
}