Question

Leia uma matriz 6 x 6, conte e escreva quantosvalores maiores que 10 ela possui.

Answer 1

algoritmo
var
A,B,c : inteiro
mat : vetor [1..6,1..6] de real
inicio
<-0
Escreval ("Preencha a Matriz")
para A de 1 ate 6 faca
para B de 1 ate 6 faca
leia (mat[A,B])
fimpara
fimpara
limpatela
para A de 1 ate 6 faca
para B de 1 ate 6 faca
se mat[A,B]>10 entao
c <-c+1
escreval ("Maior que 10 ",mat[A,B])
fimse
fimpara
fimpara
escreva("Dos 36 valoes ,Tinha ",c," valores maiores que 10")
fimalgoritmo