AULA 20

primeiros exercícios com matrizes e assim como vetores achei facil segue os exercicios ai pessoal

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_media

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

   2- Faça um programa que preencha uma matriz de 5 x 5 com números inteiros, calcule e mostre os números superiores a cinquenta e suas respectivas posições (linha e coluna). O programa deverá mostrar mensagem se não existir nenhum número nessa condição.

algoritmo_cinquenta

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

apesar das minhas dificuldades consegui resolver esses exerc. com facilidade e gostei desta parte do conteudo, porque ela apre a cabeça pra criar as coisas por exemplo jogos no proprio visualg isso sim e massa