обчислення означених інтегралів

for(i=a;i<30;i++)

{ p=p+f(i*dx)*dx;

l=l+f((i+dx)*dx)*dx;

}

cleardevice();

setcolor(1);

settextstyle(0,0,3);

outtextxy(200,50,"Rezyltat");

settextstyle(3,0,2);

setcolor(9);

rectangle(150,100,500,300);

setcolor(4);

sprintf(k," \n\tprjamokyt=%.6f",p);

outtextxy(140,180,k);

sprintf(k,"\n\n \t parabul=%.6f",l);

outtextxy(140,220,k);

getch();

cleardevice();

fon();menu(1); }

Приклад

При запуску програми зявляється три пункти меню : чисельне інтегрування ,

титульна сторінка , вихід . При запуску першої опції меню видається повідомлення :

ВВедіть а =0

ВВедіть в= ln 2

При введенні значень зявляється таблиця з результатами по методах парабол і прямокутників .