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

else if((M<0.0001) &&(M>=0)) M=M+0.00001;

}

else if(k==45) // масштаб -

{

if (M>1.000001) M--;

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

else if((M<=0.100001)&&(M>0.010001)) M=M-0.01;

else if((M<=0.010001)&&(M>0.001001)) M=M-0.001;

else if((M<=0.001001)&&(M>0.000101)) M=M-0.0001;

else if((M<=0.000100)&&(M>0.000010)) M=M-0.00001;

}

else if(k==13) // Нахождение y по значению x

{

printf("\n\n введите значение абсциссы x= ");

scanf("%lf",&xtoch);

if((A<=xtoch)&&(xtoch<=B))

{

setcolor(11);

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

{

if((x[i-1]<=xtoch)&&(xtoch<=x[i]))

{

H=xtoch-x[i-1];

ytoch=formyl3(nom,H,x[i-1],y[i-1],C1,C2,C3,C4);

printf("ордината точки равна y= %lf",ytoch);

line(325+M*xtoch,250,325+M*xtoch,250-M*ytoch);

break;

}

}

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