L06 EX06

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

algoritmo "L06_EX05"
// Função :
// Autor :
// Data : 08/11/2017
// Seção de Declarações
var
a, b, c: vetor [1..10, 1..10] de real
max_linha, max_coluna, i, j: inteiro
inicio
escreva ("Digite o numero de linhas: ")
leia (max_linha)
se (max_linha<0) ou (max_linha>10) entao
escreva ("ERRO: Muitas Linhas!!!!")
fimalgoritmo
fimse
escreva ("Digite o numero de colunas: ")
leia (max_coluna)
se (max_coluna<0) ou (max_coluna>10) entao
escreva ("ERRO: Muitas Colunas!!!!")
fimalgoritmo
fimse
i <- 1
enquanto (i <= max_linha) faca
j <- 1
enquanto (j<= max_coluna) faca
escreva ("Digite o elemento linha", i, " coluna", j, " de a: " )
leia (a[i,j])
escreva ("Digite o elemento linha", i, " coluna", j, " de b: " )
leia (b[i,j])
c[i,j] <- a[i,j] - b[i,j]
j <- j+1
fimenquanto
i <- i+1
fimenquanto
i <- 1
enquanto (i <= max_linha) faca
j <- 1
enquanto (j <= max_coluna) faca
escreva ("Elemento linha ", i, " coluna ", j, " de c: " )
escreval (c[i,j])
j <- j+1
fimenquanto
i <- i+1
fimenquanto
fimalgoritmo