Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > C++ Builder > Помогите с лабой.

Автор: xakbel 7.10.2010, 22:13

Помогите с лабой. Сверху задание, снизу вариант.
http://ipicture.ru/
Мой код

Код


Memo1->Clear();
Memo1->Lines->Add("Лабораторная работа #3. ");
Edit1->Text="0,1";
Edit2->Text="1";
Edit3->Text="4";
Edit4->Text="0,2";
double a,b,x,r,h,s,y,t,p;
int n,k;
        a=StrToFloat(Edit1->Text);
        b=StrToFloat(Edit2->Text);
        n=StrToFloat(Edit3->Text);
        h=StrToFloat(Edit4->Text);
        for (x=a; x<=b; x+=h) {
        r=2;
        s=1;  }
        for (k=1; k<=n; k++) {
        r=r*x/2;
        s+=r;
}
y=(x*x/4+x/2+1)*exp(x/2);
p=fabs(y-s);
Memo1->Lines->Add("При Х="+FloatToStr(x));
Memo1->Lines->Add("S="+FloatToStr (s));
Memo1->Lines->Add("Y="+FloatToStr(y));
Memo1->Lines->Add("Разность="+FloatToStr(p));

Х береться один- 1.1, а не 0.1; 0.3; 0.5; 0.8.
Хелп плз

Автор: EEEEEE 8.10.2010, 20:23

Лабораторная довольно примитивная.
В качестве подсказки. Если в циклах повыводить то, что по идее автора, должно изменяться.
Проанализировать... Возможно, найдётся вариант.

Первый цикл "гоняет порожняк". Зачем делать цикл по x, если в конечном итоге как были r = 2; s = 1; так и остались r = 2; s = 1;
Дальше муки творчества...)))

Автор: xakbel 9.10.2010, 12:50

Сделал))

Автор: Invisible_kid 13.10.2010, 14:18

хых) БГУИР) *настальгия*