Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- algoritmo "5_11"
- var
- m: vetor[0..10, 0..10] de inteiro
- l, c, s, ss:inteiro
- inicio
- l <- 0
- enquanto (l <= 10) faca
- c <- 0
- enquanto (c <= 10) faca
- escreva("Digite o valor da posição [",l,", ",c,"]: ")
- leia(m[l, c])
- c <- c + 1
- fimenquanto
- l <- l + 1
- fimenquanto
- ss <- 0
- s <- 0
- l <- 0
- enquanto (l <= 10) faca
- c <- 0
- enquanto (c <= 10) faca
- se (l = c) entao
- s <- s + m[l, c]
- fimse
- se (l+c = 10) entao
- ss <- ss + m[l, c]
- fimse
- c <- c + 1
- fimenquanto
- l <- l + 1
- fimenquanto
- escreval("A soma dos elementos da diagonal primária é igual a: ", s)
- escreval("A soma dos elementos da diagonal secundária é igual a: ", ss)
- fimalgoritmo
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement