Курсовая работа: Решение дифференциальных уравнений по методу Эйлера

{

if(i*M<=255)

{

line(325+M*i,248,325+M*i,252);

line(325-M*i,248,325-M*i,252);

}

if(i*M<=170)

{

line(323,250-M*i,327,250-M*i);

line(323,250+M*i,327,250+M*i);

}

}

// Прорисовка графика

setcolor(9);

for(i=1;i<N;i++)

{

if((M*y[i]>-1000)&(M*y[i]<1000))

{

line(325+M*((i-1)*h+A),250-M*y[i-1],325+M*(i*h+A),250-M*y[i]);

delay(10);

}

}

k=getch();

if(k==43) // масштаб +

{

if (M>=1) M++;

else if((M<1) &&(M>=0.1)) M=M+0.1;

else if((M<0.1) &&(M>=0.01)) M=M+0.01;

else if((M<0.01) &&(M>=0.001)) M=M+0.001;