domingo, 6 de mayo de 2012

Eliminacion Gauss-Jordan en C

Programa para resolver sistemas de ecuaciones en C

no esta de lo mejor ni esta comentado casí, pero prometo que lo comentare mas y lo subire en una nueva version donde tambien le hare optimizaciones y hare mas pequeño el codigo, por ahora, solo  esta esta version... espero les guste :)

Versiones:
version 0.8.1(ejecutable/codigo

corregido bug y ahora funciona al 100 %

7 comentarios:

  1. estoy estudiando informatica y tenia curiosidad en conocer el codigo
    se podria hacer este programa sin usar verctores???
    es decir solo con bucles for o while??

    un saludo ^^

    ResponderEliminar
  2. estoy 100 % seguro que no... bueno podrias hacerlo con muchas variables pero seria algo muy engorroso. así que nó!

    por cierto el codigo tiene un pequeño error logico (en vez de un < va un ! = en el bucle while de "gauss fila') pronto subo la modificacion.

    ResponderEliminar
  3. yo tengo un programa pero se queda pasmado cuando le doy a resolver un sistema de 3 ecuaciones con 3 incognitas

    este es mi codigo, me puedes ayudar a resoolver el problema si no es molestia?

    void main()
    {
    int n,m,i,j,k;
    float a[25][26],b[25][26],apoyo;

    clrscr();

    printf("\n\t\t\tMETODO GAUSS - JORDAN");
    printf("\n\n-->Ingrese el numero de Ecuaciones = "); scanf("%d",&n);
    printf("\n-->Ingrese coeficientes\n");

    /* Datos para iniciar método */

    for(i=1; i<=n; i++)
    {
    printf("\n->Fila %d\n\n", i);
    for(j=1; j<=n+1; j++)
    {
    printf("->Ingese a(%d,%d) = ", i, j); scanf("%f", &a[i][j]);
    }
    }
    /* Fin Del Ciclo De Solicitud De Datos */

    /* Proceso Principal */

    m=n+1;
    do
    {
    if(a[1][1]==0)
    {
    k=m-1;
    for(i=2; i<=k; i++)
    {
    if(a[i][1]!=0)
    {
    for(j=1; j<=m; j++)
    {
    apoyo=a[i][j];
    a[i][j]=a[1][j];
    a[1][j]=apoyo;
    }
    }
    }
    }
    else
    {
    for(j=2; j<=m; j++)
    {
    for(i=2; i<=n; i++)
    {
    b[i-1][j-1]=a[i][j]-a[1][j]*a[i][1]/a[1][1];
    }
    }
    for(j=2; j<=m; j++)
    {
    b[n][j-1]=a[1][j]/a[1][1];
    }
    m=m-1;
    for(j=1; j<=m; j++)
    {
    for(i=1; i<=n; i++)
    {
    a[i][j]=b[i][j];
    }
    }
    }
    }
    while(m>1);
    printf("\n\n SOLUCION DEL SISTEMA\n ");
    for(i=1; i<=n; i++)
    {
    printf("\n X(%d) = %0.3f",i,a[i][1]);
    }
    printf("\n\n\t\t\tHa terminado correctamente");
    getch();
    clrscr();
    }

    ResponderEliminar
  4. The money relеaseԁ bу thе buѕіnеss team.
    Web Dеѕign Inԁia is a big issue. Roddick wanted heг operation to be nаtuгal and еnνіronmеntally conscious.


    Hеre is my ωeb sіtе -
    http://www.er.uqam.ca/nobel/fpe3650/wiki/index.php?title=Utilisateur:CarrieWal

    ResponderEliminar
  5. Can Call Of Duty World At War Ds Save the World? Throw in GWAR and KISS and
    you've got a fighting game that pits strippers against porn stars. Although some companies attempted to introduce such a game to get you started on your way to success writing for call of duty world at war ds online.

    Also visit my page :: call of duty modern warfare 4

    ResponderEliminar
  6. Hola tienes el algoritmo (solo general) de tu solución al método Gauss.

    Atte.
    Juan

    ResponderEliminar
  7. While this might not seem much, a change of strategy is helpful when playing golf during bad Chasing Storms since golf is a game that is specifically dependent on the Chasing Storms.
    For Australians seeking to visit Spain, there are certain
    considerations which you must keep in mind while shooting.
    We know from flybys that Jupiter's output of heat is more than just a bad year.

    Here is my webpage - storm chasers for kids

    ResponderEliminar