Ejemplos de matrices, logica computacional

1. Hacer un algoritmo para almacenar en una matriz de 10 x 10, datos numéricos y presentar el promedio de todos los datos contenidos en ella. Imprimir la matriz.

Algoritmo matriz10x10

Inicio

//Declaración de variables

Var

Entero: F = 0, C = 0, contador = 0, totnum = 0

DIM MATRIZ(10,10): ENTERO

H-M F <= 10

    H-M C <= 10

    Escribir “Ingrese el número”

    Leer MATRIZ(F,C)

    Totnum = totnum + MATRIZ(F,C)

    Contador = contador + 1

    C = C + 1

    Fin H-M

    F = F + 1

Fin H-M

Prom = totnum / contador

H-M F <= 3

    H-M C <=3

    Imprimir MATRIZ(F,C)

    C = C + 1

    Fin H-M

    F = F + 1

Fin H-M

Fin 

1. Almacenar en una matriz de N x N datos numéricos, determinar la sumatoria de los datos por cada fila. Imprimir la matriz y las sumas.

Algoritmo matrizNxN

Inicio

//Declaración de variables

Var

Entero: F = 0, C = 0, filas, colum, sumafilas = 0

Escribir “Ingrese la cantidad de filas a evaluar”

Leer filas

Escribir “Ingrese la cantidad de columnas a evaluar”

Leer colum

DIM MATRIZ(filas,colum): ENTERO

HACER DESDE F = 1 HASTA filas

    HACER DESDE C=1 HASTA colum

    Escribir “Ingrese el número”

    Leer MATRIZ(F,C)

    Sumafilas = sumafilas + mat(x,y)

    C = C + 1

    Fin H-D-H-I

    Imprimir “La suma de la fila”, MATRIZ(F,C), es: “, sumafilas

    F = F + 1

Fin H-D-H-I

Fin

1. De una matriz de N por N, generar otra que contenga 2 filas una que sea la diagonal principal y la otra la diagonal inversa. Imprimir ambas matrices y el dato contenido donde las 2 diagonales se interceptan

Algoritmo matrizdiagonal

Inicio

//Declaración de variables

Var

Entero: F = 0, C = 0, filas, colum

Escribir “Ingrese la cantidad de filas a evaluar”

Leer filas

Escribir “Ingrese la cantidad de columnas a evaluar”

Leer colum

DIM MATRIZ(filas,colum): ENTERO

HACER DESDE F = 1 HASTA filas

    HACER DESDE C=1 HASTA colum

    Escribir “Ingrese el número”

    Leer MATRIZ(F,C)

    Si F = C entonces

    MATRIZ(F,C) = MatrizDiagonal(X,Y)

    Fin si

    C = C + 1

    Fin H-D-H-I

    F = F + 1

Fin H-D-H-I

Imprimir MATRIZ(F,C), MatrizDiagonal(x,y)

Fin