Сумма ряда и факториал

[rw61]

День добрый. Прошу помощи экспертов.
Задание
Для каждого x, изменяющегося от a до b с шагом h, найти значения функции Y(x), суммы S(x) и |Y(x)–S(x)| и вывести в виде таблицы. Значения a, b, h и n вводятся с клавиатуры.
Так как значение S(x) является рядом разложения функции Y(x), при правильном решении значения S и Y для заданного аргумента x (для тестовых значений исходных данных) должны совпадать в целой части и в первых двух-четырех позициях после десятичной точки.
Работу программы проверить для a = 0,1; b = 1,0; h = 0,1; значение параметра n выбрать в зависимости от задания (10, 20, 50, 100). n = 30.

S(x) = E(k=0,n) cos(kPi/4)*x^k/k!
Y(x) = e^xcosPi/4*(cos(xsinPi/4)

Полученные результаты не совпадают с пожеланиями в задании. Подскажите,пожалуйста, в чём косяк может быть. Спасибо.
Мой код:
{
double a,b,x,h,Pi,e,y,s,r,f,t,v,m;
int n,k;
Pi=3.14159265359;
e=2,718281828459045;
t=cos(Pi/4);
v=sin(Pi/4);

for (x = a; x<=b; x+=h)
{
y=pow(e,t)*cos(x*v);

for(k=1,f=1; k<=n; k++)
{
f=f*k; //факториал
m=(cos(k*Pi/4)*pow(x,k))/f ; //член ряда
s=s+m; //сумма
r=fabs(y-s);
}
.

[evg_m]

Работу программы проверить для a = 0,1; b = 1,0; h = 0,1; значение параметра n выбрать в зависимости от задания (10, 20, 50, 100). n = 30.

double a,b,x,h,Pi,e,y,s,r,f,t,v,m;
int n,k;
Pi=3.14159265359;
e=2,718281828459045;
t=cos(Pi/4);
v=sin(Pi/4);

a=???
b=???
....

[rw61]

да. все значения вводятся через Edit в formCreate

[evg_m]

да. все значения вводятся через Edit в formCreate

они вводятся в ДРУГИЕ переменные. а не в те которые используются при вычислениях.
в предыдущем сообщении красным выделены те переменные, значения которых не заданы.
для проверки сделайте вывод этих значений ВО время вычислений.

[rw61]

Сообщение от evg_m

они вводятся в ДРУГИЕ переменные. а не в те которые используются при вычислениях.
в предыдущем сообщении красным выделены те переменные, значения которых не заданы.
для проверки сделайте вывод этих значений ВО время вычислений.

значения верно присвоены переменным. проверял.

[Аватар]

Ну и покажи где в твоем коде, например, переменной a присваивается значение?

[rw61]

в начальном коде я не указывал. хотел кратенько основное выложить

void __fastcall TForm1::FormCreate(TObject *Sender)
{
Edit1->Text="0,1";
Edit2->Text="1,0";
Edit3->Text="30";
Edit4->Text="0,1";

}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
.......
a = StrToFloat(Edit1->Text);
b = StrToFloat(Edit2->Text);
n = StrToInt(Edit3->Text);
h = StrToFloat(Edit4->Text);
......
}

[evg_m]

в начальном коде я не указывал. хотел кратенько основное выложить

теперь покажи ВСЕ объявления переменных a,b,n,h
одно из них ты уже показал

Мой код:
{
double a,b,x,h,Pi,e,y,s,r,f,t,v,m;
int n,k;

а остальные? ведь есть и еще где-то скрытое за ...... double a,b

void __fastcall TForm1::Button1Click(TObject *Sender)
{
.......
a = StrToFloat(Edit1->Text);

они вводятся в ДРУГИЕ переменные. а не в те которые используются при вычислениях.

[rw61]

evg_m
немного не понимаю, зачем 2 раза инициализировать переменные a,b,n,h.

есть a = StrToFloat(Edit1->Text);
и есть Edit1->Text="0,1";

в любом случае, при инициализации путём double a=0.1, b=1.0,... результат не меняется.

[Аватар]

Как насчет начального значения s? Да и k в формуле суммы от 0, а не от 1