본문내용
hile(E[i]-y1>0.0001)//오차 10-4
{
y1=y+h*(f(c,y)+f(x,y1))/2;//개량된 Euler 구하기
}
y=y1;
}
return;
}
// f(t,y) 서브루틴
double f(double x, double y)
{
return(x*pow(y,1/3));
}
주어진 문제 ) y ' = x · y1/3 =f(x, y)
y ( 1 ) = 1
개량된 Euler 방법에 의한 Y값 추정
N=100 H=0.01 x=1 y=1 y(1)=1
#include
#include
double f(double, double); // 함수 f(x,y) 서브루틴 선언
double y;
void main()
{
int n;
double x=1.00, h=0.01, y1=y=1,E[101],X[101],c;
for(int i=0; i<101; i++)
{
c=X[i]=x;
E[i]=pow((pow(X[i],2)+2)/3,1.5); //실제값
printf("X=%.2lf 수정된Euler=%.5lf 실제적분값=%.5lf\n", x, y,E[i]);
x=x+h;
y1=y+h*f(c,y);
y=y+h*(f(c,y)+f(x,y1))/2;// y(n+1)=y(n)+h*(f[x,y]+f[x+h,y+h*f[x,y]])/2
y1=y;
while(E[i]-y1>0.0001)
{
y1=y+h*(f(c,y)+f(x,y1))/2;
}
y=y1;
}
return;
}
// f(t,y) 서브루틴
double f(double x, double y)
{
return(x*pow(y,1/3));
}
{
y1=y+h*(f(c,y)+f(x,y1))/2;//개량된 Euler 구하기
}
y=y1;
}
return;
}
// f(t,y) 서브루틴
double f(double x, double y)
{
return(x*pow(y,1/3));
}
주어진 문제 ) y ' = x · y1/3 =f(x, y)
y ( 1 ) = 1
개량된 Euler 방법에 의한 Y값 추정
N=100 H=0.01 x=1 y=1 y(1)=1
#include
#include
double f(double, double); // 함수 f(x,y) 서브루틴 선언
double y;
void main()
{
int n;
double x=1.00, h=0.01, y1=y=1,E[101],X[101],c;
for(int i=0; i<101; i++)
{
c=X[i]=x;
E[i]=pow((pow(X[i],2)+2)/3,1.5); //실제값
printf("X=%.2lf 수정된Euler=%.5lf 실제적분값=%.5lf\n", x, y,E[i]);
x=x+h;
y1=y+h*f(c,y);
y=y+h*(f(c,y)+f(x,y1))/2;// y(n+1)=y(n)+h*(f[x,y]+f[x+h,y+h*f[x,y]])/2
y1=y;
while(E[i]-y1>0.0001)
{
y1=y+h*(f(c,y)+f(x,y1))/2;
}
y=y1;
}
return;
}
// f(t,y) 서브루틴
double f(double x, double y)
{
return(x*pow(y,1/3));
}
추천자료
사회복지의 역사
유전자 변형 농산물 (GMO)
유전자 변형 식품 (GMO)의 정의와 실태, 그리고 향후 대안
물리,화학흡착의 비교 및 흡착식에 대한 설명
등기신청인과 관련한 등기선례
도립진자실험
조섬유정량
사회복지의 역사
재개발재건축사업
수학과(수학학습, 수학수업)의 목표, 수학과(수학학습, 수학수업)의 수업환경과 단계별내용, ...
[산업재산권 실용신안][산업재산권 의장][산업재산권 상표][산업재산권 특허]산업재산권의 실...
사회복지정책 관련한 쟁점과 본인의 생각 제시
[예방치학] 올바른 칫솔질.ppt
주거환경개선사업과 주택재개발사업의 비교 배경 및 개선방안
소개글