Курсовая работа: Алгоритм построения графика изменения напряженности поля движущейся заряженной частицы

//zalivaem fon

setfillstyle(SOLID_FILL,7);

bar(0,0,getmaxx(),getmaxy());

//vivodim nomer varianta

setcolor(2);

sprintf(st,"Variant No %d",a+1);

outtextxy(0,4,st);

//4ertim osi

setcolor(0);

line(xmin,ymin,xmin,ymax);//os' oy

line(xmin,ymax,xmax,ymax);//os' ox

//risyem strelo4ki

line(xmin,ymin,xmin+3,ymin+5); // Y \

line(xmin,ymin,xmin-3,ymin+5); // Y /

line(xmax,ymax,xmax-5,ymax-3); // X \

line(xmax,ymax,xmax-5,ymax+3); // X /

//podpisivaem osi

setcolor(6);

outtextxy(xmin+6,ymin,"H");

outtextxy(xmax,ymax-10,"t");

//4ertim i podpisivaem delenija po osi oy

setcolor(0);

settextstyle(SMALL_FONT,HORIZ_DIR,4);

for(y_tek=ymax-20;y_tek>ymin+10;y_tek-= 20)

{

line(xmin-2,y_tek,xmin+2,y_tek);

sprintf(st,"%0.5lf",maxH-(y_tek-ymin)*(maxH-minH)/(ymax-ymin));

outtextxy(xmin-70,y_tek-6,st);

}