MATRIZ

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

algoritmo "matriz"
var
 matriz:vetor[1..10,1..10] de inteiro
 i,j,m,n:inteiro
inicio
escreval("***** Entrada de Dados *****")
escreval("")
escreva("Digite o numero de linhas e o numero de colunas para matriz:")
leia(m,n)
para i de 1 ate m faca
 para j de 1 ate n faca
 escreva("Digite um valor para linha:",i," coluna:",j,":")
 matriz[i,j]<-j+i
 fimpara
fimpara
limpatela
escreval("***** Resultados da matriz *****")
para i de 1 ate m faca
 para j de 1 ate n faca
 escreva(matriz[i,j])
 fimpara
 escreval("")
fimpara
fimalgoritmo