1- Faça um programa que preencha uma matriz 10 x 3 com as notas de dez alunos em três provas. O programa deverá mostrar um relatório com o número dos alunos (numero da linha) e a prova em que cada aluno obteve menor nota. Ao final do relatório, deverá mostrar quantos alunos tiveram menor nota em cada uma das provas: na prova 1, na prova 2 e na prova 3.
algoritmo "exec_01_aula20"
var
x,y:inteiro
nota:vetor[1..10,1..3] de real
inicio
para x de 1 ate 10 faca
para y de 1 ate 3 faca
escreva("Escreva a NOTA Nº",y," do aluno",x,": ")
leia(nota[x,y])
limpatela
fimpara
fimpara
para x de 1 ate 10 faca
se (nota[x,1] < nota[x,2]) e (nota[x,1] < nota[x,3]) entao
escreval("Aluno",x," teve a pior nota na prova nº 1.")
senao
se (nota[x,2] < nota[x,1]) e (nota[x,2] < nota[x,3]) entao
escreval("Aluno",x," teve a pior nota na prova nº 2.")
senao
se (nota[x,3] < nota[x,1]) e (nota[x,3] < nota[x,2]) entao
escreval("Aluno",x," teve a pior nota na prova nº 3.")
senao
escreval("Ele teve notas iguais.")
fimse
fimse
fimse
fimpara
fimalgoritmo
algoritmo "Exec_02_aula20"
var
num:vetor [1..5,1..5] de inteiro
maiores:vetor[1..5,1..5] de inteiro
x,y:inteiro
inicio
para x de 1 ate 5 faca
para y de 1 ate 5 faca
escreva("Escreva um número inteiro: ")
leia(num[x,y])
se (num[x,y] > 50) entao
maiores[x,y]<-num[x,y]
fimse
fimpara
fimpara
limpatela
para x de 1 ate 5 faca
para y de 1 ate 5 faca
se (maiores[x,y] > 50) entao
escreval("O Número",maiores[x,y]," é maior que 50.")
senao
escreval("O numero da linha",x," e coluna",y," é menore que 50...")
fimse
fimpara
fimpara
fimalgoritmo
obs:parte de matrizes, ficou no ar ainda, não intendi quase nada ta muito dificil,mas falta pratica.
