none
Suma de Matrices (a Pie) ... Mejorarlo

    Question

  • Creo que este codigo que he hecho es un poco  largo y quiero que se vea un poco mejor

    Sumo el vector a y b y los muestro en Pantalla

     

     Public matriz_a(2, 2), matriz_b(2, 2) As Double
    
    Console.WriteLine()
     Console.WriteLine(Space(10) & "│" & Space(2) & Suma() & Space(2) & "│")
    Console.Write("[a+b]= ")
    Console.WriteLine(Space(3) & "│" & Space(2) & Suma1() & Space(2) & "│")
    Console.WriteLine(Space(10) & "│" & Space(2) & Suma2() & Space(2) & "│")
     Console.Write(Space(30) & "[3*3]")
     Console.ReadLine()
    
    Public Function Suma() As Object
      Suma = matriz_a(0, 0) + matriz_b(0, 0) & Space(3) & matriz_a(0, 1) + matriz_b(0, 1) & Space(3) & matriz_a(0, 2) + matriz_b(0, 2)
     End Function
     Public Function Suma1() As Object
      Suma1 = matriz_a(1, 0) + matriz_b(1, 0) & Space(3) & matriz_a(1, 1) + matriz_b(1, 1) & Space(3) & matriz_a(1, 2) + matriz_b(1, 2)
     End Function
     Public Function Suma2() As Object
      Suma2 = matriz_a(2, 0) + matriz_b(2, 0) & Space(3) & matriz_a(2, 1) + matriz_b(2, 1) & Space(3) & matriz_a(2, 2) + matriz_b(2, 2)
     End Function
    

     


    Estudiante de Sistemas Informáticos.
    Friday, February 25, 2011 11:54 PM

Answers

  • Hola:

    http://www.elguille.info/colabora/puntoNET/tutGDI/Matrices.htm

    Te paso el código en C#, (en VB.NET es análogo).
    
    No sé si es lo que querías, pero:
    
        int columnas = 10, filas = 10;
    
        // Definimos las matrices "sumando", aunque pueden venir como parámetros de la función
        int[,] A = new int[filas, columnas];
        int[,] B = new int[filas, columnas];
        
        // Aquí se rellenan los valores de A y B
    
        int[,] C = new int[filas, columnas];
    
        for (int f = 0; f < filas; f++)
        {
          for (int c = 0; c < columnas; c++)
          {
            C[f, c] = A[f, c] + B[f, c];
          }
        }
    

    Saludo.


    http://electronica-pic.blogspot.com
    Saturday, February 26, 2011 2:10 AM
  • utilize esa forma perno al monento de mostrarlo en pantalla me sale nada mas un numero

    me hadia quedado asi

     For i As Integer = 0 To b.GetUpperBound(0)
                For j As Integer = 0 To b.GetUpperBound(1)
                    Console.Write("Valor " & i & "," & j & ":")
                 'aqui la suma de vectores
                Next
            Next


    Estudiante de Sistemas Informáticos.
    Saturday, February 26, 2011 2:14 AM
  • ' Definimos las matrices "sumando", aunque pueden venir como parámetros de la función
    Dim A As Integer(,) = New Integer(filas - 1, columnas - 1) {}
    Dim B As Integer(,) = New Integer(filas - 1, columnas - 1) {}
    
    ' Aquí se rellenan los valores de A y B
    
    Dim C__1 As Integer(,) = New Integer(filas - 1, columnas - 1) {}
    
    For f As Integer = 0 To filas - 1
    	For c As Integer = 0 To columnas - 1
    		C__1(f, c__2) = A(f, c__2) + B(f, c__2)
    	Next
    Next
    


    http://electronica-pic.blogspot.com
    Saturday, February 26, 2011 5:14 AM

All replies

  • Hola:

    http://www.elguille.info/colabora/puntoNET/tutGDI/Matrices.htm

    Te paso el código en C#, (en VB.NET es análogo).
    
    No sé si es lo que querías, pero:
    
        int columnas = 10, filas = 10;
    
        // Definimos las matrices "sumando", aunque pueden venir como parámetros de la función
        int[,] A = new int[filas, columnas];
        int[,] B = new int[filas, columnas];
        
        // Aquí se rellenan los valores de A y B
    
        int[,] C = new int[filas, columnas];
    
        for (int f = 0; f < filas; f++)
        {
          for (int c = 0; c < columnas; c++)
          {
            C[f, c] = A[f, c] + B[f, c];
          }
        }
    

    Saludo.


    http://electronica-pic.blogspot.com
    Saturday, February 26, 2011 2:10 AM
  • utilize esa forma perno al monento de mostrarlo en pantalla me sale nada mas un numero

    me hadia quedado asi

     For i As Integer = 0 To b.GetUpperBound(0)
                For j As Integer = 0 To b.GetUpperBound(1)
                    Console.Write("Valor " & i & "," & j & ":")
                 'aqui la suma de vectores
                Next
            Next


    Estudiante de Sistemas Informáticos.
    Saturday, February 26, 2011 2:14 AM
  • ' Definimos las matrices "sumando", aunque pueden venir como parámetros de la función
    Dim A As Integer(,) = New Integer(filas - 1, columnas - 1) {}
    Dim B As Integer(,) = New Integer(filas - 1, columnas - 1) {}
    
    ' Aquí se rellenan los valores de A y B
    
    Dim C__1 As Integer(,) = New Integer(filas - 1, columnas - 1) {}
    
    For f As Integer = 0 To filas - 1
    	For c As Integer = 0 To columnas - 1
    		C__1(f, c__2) = A(f, c__2) + B(f, c__2)
    	Next
    Next
    


    http://electronica-pic.blogspot.com
    Saturday, February 26, 2011 5:14 AM