Algoritmo del Método de Gauss – Seidel

Ingresar s

Repetir i = 1,….n

        x1i = valores iniciales

Fin repetir

Repetir mientras Flag = 1

      Flag = 0

      Repetir i = 1,….n

             sum = 0

            Repetir j = 1,….n

                  Si i  j

                        sum = sum + aij . X1j

                  Fin si

            Fin repetir

            A = ( bi - sum ) / aii

           Si mod  A - x1i  > es

                Flag = 1

     
Fin si x1i = A A = 0 Fin repetir

Fin repetir mientras