Ingrid Luíza Reinehr Postado Junho 11, 2017 Denunciar Share Postado Junho 11, 2017 Preciso de ajuda para escrever um programa no pascal com duas matrizes de qualquer dimensão, analisar se elas satisfazem as propriedades de multiplicação de matrizes e se confirmar, fazer a muktiplicação e apresentar a matriz resultante. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Jhonas Postado Junho 12, 2017 Denunciar Share Postado Junho 12, 2017 exemplo: program matriz; var matriz_a : array[1..10, 1..10]of integer; matriz_b : array[1..10, 1..10]of integer; matriz_c : array[1..10, 1..10]of integer; i, j, k, nlin_a, nlin_b, ncol_a, ncol_b : integer; begin writeln('-Ordem da 1ª matriz-'); write('Nº de linhas: '); readln(nlin_a); write('Nº de colunas: '); readln(ncol_a); {=======================================} writeln('-Ordem da 2ª matriz-'); write('Nº de linhas: '); readln(nlin_b); write('Nº de colunas: '); readln(ncol_b); if(ncol_a<>nlin_b)then begin writeln('Não existe a matriz produto!'); end else begin writeln('Valores da 1ª matriz:'); for i:=1 to nlin_a do begin for j:=1 to ncol_a do begin write(i, j, ': '); readln(matriz_a[i, j]); end; end; {=================================================} writeln('Valores da 2ª matriz:'); for i:=1 to nlin_b do begin for j:=1 to ncol_b do begin write(i, j, ': '); readln(matriz_b[i, j]); end; end; {===============================================} for i:=1 to nlin_a do begin for j:=1 to ncol_b do begin matriz_c[i, j]:=0; for k:=1 to ncol_a do matriz_c[i, j]:=matriz_a[i, k]*matriz_b[k, j]+matriz_c[i, j]; end; end; {===============================================} writeln('-Resultado-'); for i:=1 to nlin_a do begin for j:=1 to ncol_b do write(matriz_c[i, j]:5); writeln; end; end; writeln; end. ou https://www.vivaolinux.com.br/scripts/download.php?codigo=5034 http://programandocompascal.blogspot.com.br/2011/01/multiplicacao-de-matriz.html abraço Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Ingrid Luíza Reinehr
Preciso de ajuda para escrever um programa no pascal com duas matrizes de qualquer dimensão, analisar se elas satisfazem as propriedades de multiplicação de matrizes e se confirmar, fazer a muktiplicação e apresentar a matriz resultante.
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.