Foros aprenderaprogramar.com
Didáctica y divulgación de la programación

Gente, como andan ?
Ando buscando ayuda en la creación de un programa en pascal que necesitaria ayuda ya que es un ejercicio de la facultad.

Es un ejercicio de matrices que me pide:

1. Leer el valor de N
2. Leer el valor de M
3. Leer una matriz de NxM
4. Leer un vector de longitud M
5. Informar el vector de longitud N que se obtiene al multiplicar la matriz
leda en el punto 3 por el vector del punto 4.

Yo pense algo asi:

1) Declaro variables
2) Procedimiento Columnas_de_matriz
Donde le ingreso los valores de cada componente de las diferentes columnas de la matriz
3) Procedimiento filas_de_matriz
Le ingreso los valores de cada componente de las filas de la matriz
4) Procedimiento vector
Le ingreso los valores del vector
5) programa principal con:
a. se le ingresa la cantidad de columnas
b. se le ingresa la cantidad de filas
c. un FOR que vaya de 1 hasta el numero final de filas que adentro tenga primero otro for que utilice desde el 1 hasta el final de las columnas el procedimiento de columnas de matriz y despues el procedimiento de filas de matriz.
d. que muestre la matriz entera.
e. que haga el procedimiento vector
f. que muestre el vector.
g. que haga la multiplicacion vectorial
h. que muestre la matriz resultado.


Y en codigo tengo algo asi:
program matriz;
uses crt;
var
N,M:real;
tfilas:array[1..N] of real;
tcolumnas:array[1..M]of real;

begin
Procedure columnas_de_matriz (var M:real; N:real)
var
i:byte;
comp_columnas:tcolumnas;
begin
i:=0;
i:=i+1;
writeln('ingrese el componente ', i,N, 'de su matriz: ');
readln(comp_columnas[i]);
end;

Procedure filas_de_matriz (var M:real; N:real);
var
j:byte;
comp_filas:tfilas;
begin
j:=0;
j:=j+1;
writeln('ingrese el componente ', i,M, 'de su matriz: ');
readln(comp_filas[j]);
end;

writeln('ingrese la cantidad de filas de su matriz: ');
readln(N);
writeln('ingrese la cantidad de columnas de su matriz: ');
readln(M);
for 1 to N do
begin
for 1 to M do columnas_de_matriz;
filas_de_matriz;
end;


Me ayudan a seguir que me queda ahi?

Gracias