построение простого графика
Здравствуйте!
Есть код построения графика по формуле расчёта методом конечных разностей
(метод решёток):
Но вместо графика рисуется просто прямая, с нулями по оси Y
Не могу никак написать код правильно, чтобы строился график по нажатию Button1!
Прошу помощи!
Есть код построения графика по формуле расчёта методом конечных разностей
(метод решёток):
Код:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
float dT[8];
float T[8];
int i;
int m = 8;
float dtau = 0.1;
float lx = 0.14;
float a = 0.0001;
float dx = lx/(m-1);
int tt;
for (int i=0; i<m; i++)
{
T[i]=0;
dT[i]=0;
}
for (int tt=1; tt<=500; tt++)
{
T[0] = 100;
T[7] = 0;
for (int i=2; i<m-1; i++)
{
dT[i] = a*dtau*((T[i-1]-2*T[i]+T[i+1])/(dx*dx))+T[i];
T[i] = T[i]+dT[i];
}
if (tt%100 == 0)
Series1 -> AddXY(tt*dtau, T[2]);
}
}
{
float dT[8];
float T[8];
int i;
int m = 8;
float dtau = 0.1;
float lx = 0.14;
float a = 0.0001;
float dx = lx/(m-1);
int tt;
for (int i=0; i<m; i++)
{
T[i]=0;
dT[i]=0;
}
for (int tt=1; tt<=500; tt++)
{
T[0] = 100;
T[7] = 0;
for (int i=2; i<m-1; i++)
{
dT[i] = a*dtau*((T[i-1]-2*T[i]+T[i+1])/(dx*dx))+T[i];
T[i] = T[i]+dT[i];
}
if (tt%100 == 0)
Series1 -> AddXY(tt*dtau, T[2]);
}
}
Не могу никак написать код правильно, чтобы строился график по нажатию Button1!
Прошу помощи!
Во внутреннем цикле i=1,а не 2 и float следует заменить на double:
Код:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
const int m = 8;
double dT[m],
T [m],
dtau = 0.1,
lx = 0.14,
a = 0.0001;
double dx = lx/(m-1);
for (int i=0; i<m; i++){
T[i] = dT[i] = 0.0;
}
for (int tt=1; tt<=500; tt++){
T[0] = 100.0;
T[7] = 0.0;
for (int i=1; i<m-1; i++){
dT[i] = a*dtau*((T[i-1]-2*T[i]+T[i+1])/(dx*dx))+T[i];
T[i] = T[i] + dT[i];
}
if (tt%100 == 0)
Series1->AddXY(tt*dtau,T[2]);
}
}
{
const int m = 8;
double dT[m],
T [m],
dtau = 0.1,
lx = 0.14,
a = 0.0001;
double dx = lx/(m-1);
for (int i=0; i<m; i++){
T[i] = dT[i] = 0.0;
}
for (int tt=1; tt<=500; tt++){
T[0] = 100.0;
T[7] = 0.0;
for (int i=1; i<m-1; i++){
dT[i] = a*dtau*((T[i-1]-2*T[i]+T[i+1])/(dx*dx))+T[i];
T[i] = T[i] + dT[i];
}
if (tt%100 == 0)
Series1->AddXY(tt*dtau,T[2]);
}
}
Спасибо, Meander! Вы очень помогли! Сработало!