Контрольная работа: Алгоритмічні мови програмування мова С

line(q/2,0,q/2+10,10);

i=a;

j=0;

settextstyle(2,0,0);

setusercharsize(1, 1, 3, 2);

do

{

y=F(i);

setcolor(15);

setlinestyle(1,0,3);

circle(j*q*h/(b-a),(w/2-y*w/(2*max)),2); /*виведенняточоктабуляцii*/

sprintf(m, "%.2f", i);

outtextxy(j*q*h/(b-a),w/2,m); /*значеннянавiсi Х*/

setcolor(15);

setlinestyle(0,0,2);

line(j*q*h/(b-a), w/2-3,j*q*h/(b-a), w/2+3); /*розмiткавiсi Х*/

j=j+1;

i=i+h;

}

while (i <= b);

for (i=a,j=0; i<=b;j++, i=i+(b-a)/q) /*виведенняусiхточокграфiкунапромiжку [a,b]*/

putpixel(j,(w/2-F(i)*w/(2*max)),14);

getch(); /*зчитування символу з клавiатури*/

closegraph(); /*закриття графiчноi системи*/

return 0; /*нормальне завершення роботи програми*/

}

float F (float x) /*обчислення значення заданоi функцii в точцi X*/

{

returnsin(x)/x;