したらばTOP ■掲示板に戻る■ 全部 1-100 最新50 | メール | |

機械創造工学科・機械工学科スレッド

452451:2003/11/20(木) 18:16
void GAUSS(void)
{
int i,j,k;
float v;

for(i=0;i<N;i++)
for(j=0;j<N;j++)a[i][j]=AM[i][j];
for(i=0;i<N;i++) b[i]=BV[i];

for(k=0;k<N-1;k++){
for(i=k+1;i<N;i++){
v=a[i][k]/a[k][k];
for(j=k;j<N;j++) a[i][j]=a[i][j]- v*a[k][j];
b[i]=b[i]-v*b[k];
}
}

x[N-1]=b[N-1]/a[N-1][N-1];
for(i=N-2;i>=0;i--){
v=b[i];
for(j=N-1;j>i;j--)
v=v-a[i][j]*x[j];
x[i]=v/a[i][i];

}
}


新着レスの表示


名前: E-mail(省略可)

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

(画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります)

掲示板管理者へ連絡 無料レンタル掲示板