Exercicio de Pascal

bom.. você precisa esboçar algo..

[]s

Criar um algoritmo que receba duas matrizes ACxD e BExF (C, D, E e F 6). Esse algoritmo deve verificar se o produto matricial de A por≤

B é possível (D = E). Caso seja possível, calcular o tal produto,imprimindo a matriz GCxF resultado.

Criar um algoritmo que receba duas matrizes ACxD e BExF (C, D, E e

F <= 6). Esse algoritmo deve verificar se o produto matricial de A por B é possível (D = E). Caso seja possível, calcular o tal produto,imprimindo a matriz GCxF resultado.

Program Matrix
uses crt;
var A,B,G: array [1..100,1..100]
i,j,k,l:integer
begin

clrscr;
 Writeln('digite as dimensoes das matrizes A e B menor ou igual a 6');
 Readln(k,l);
 Writeln('digite os itens da Matriz A:');
 For i:=1 to k do Begin
 For j:=1 to l do Begin
 Read(A[i,j]);
 End;
 Readln;
 end;
 Writeln('digite os itens da matriz B:');
 For i:=1 to k do Begin
 For j:=1 to l do Begin
 Read(B[i,j]);
 End;
 Readln;
 end;

{produto de A + B}
For i:=1 to k do Begin
For j:=1 to l do Begin

 G[i,j]:=A[i,j]+B[i,j];
 End;
 End;

{exibir resultado}

 Writeln('O resultado do produto A+B é:');
 For i:=1 to k do Begin
 For j:=1 to l do Begin
 Write(G[i,j],' ');
 End;
 Writeln;
 End;
Readkey;

End.

Bom foi isso mais ou menos que entendi:

Fonte adaptada de : http://www.lsd.ic.unicamp.br/projetos/e-lane/introPascal/aula7.html

Espero ajudar

Até +