【文件属性】:
文件名称:Gauss列主元消去法求解线性方程组
文件大小:2KB
文件格式:TXT
更新时间:2013-11-13 08:12:20
可以在vc里运行的列主元消去法的程序
#include
#include
#define N 100
#define epsilon 1e-6
float a[N][N+1];
void menu( )
{
printf("\t\t%c%c%c^_^Gauss列主元消去法求解线性方程组^_^%c%c%c\n\n",1,1,1,1,1,1);
printf("强烈建议您先阅读以下几点后在运行:\n");
printf("1.这是用Gauus列主元消去法求解线性方程组的应用程序\n");
printf(" (Gauus全主元消去法类似可做,读者有兴趣的话可自行而做)\n");
printf("2.请您先了解Gauus列主元消去法的主要思想\n");
}
void main( )
{
int i,j,k,n;
float t,s=0;
char choice;
menu( );
loop:
printf("\n请输入系数方阵的阶数:");
scanf("%d",&n);
while(n>0)
{
printf("\n");
printf("请输入增广阵矩:\n");
for(i=0;i fabs(a[k][k]) )
for(j=k;j=0;k--)
{
s=0;
for(j=k+1;j