VisualG Alguem poderia me ajudar com esse algoritmo

[Heitor177]

Estou travado nessa parte e não consigo fazer os menu ! 

 

algoritmo "notas"

var
   l,c,opcao :inteiro
   notas: vetor [1..3,1..5] de real

inicio
   para l <- 1 ate 3 faca
      para c <- 1 ate 5 faca
         se (c = 1) entao
            escreval("informe a matricula do aluno:")
            leia (notas[l,c])
         senao
            se (c = 2)entao
               escreval("informe vai:")
               leia (notas[l,c])
               enquanto (notas[l,c] < 0) ou (notas[l,c] >15) faca
                  escreval ("nota invalida, informe a nota correta da va1 ")
                  leia (notas[l,c])
               fimenquanto
            senao
               se (c = 3)entao
                  escreval("informe a vaii:")
                  leia (notas[l,c])
                  enquanto (notas[l,c] < 0) ou (notas[l,c] >25) faca
                     escreval ("nota invalida, informe a nota correta da va2")
                     leia (notas[l,c])
                  fimenquanto
               senao
                  se (c = 4)entao
                     escreval("informe a vaiii:")
                     leia (notas[l,c])
                     enquanto (notas[l,c] < 0) ou (notas[l,c] >35) faca
                        escreval ("nota invalida, informe a nota correta da va3")
                        leia (notas[l,c])
                     fimenquanto
                  senao
                     se (c = 5)entao
                        escreval("informe a nota da oat:")
                        leia (notas[l,c])
                        enquanto (notas[l,c] < 0) ou (notas[l,c] >25) faca
                           escreval ("nota invalida, informe a nota correta da oat")
                           leia (notas[l,c])
                        fimenquanto
                     fimse
                  fimse
               fimse
            fimse
         fimse
      fimpara
   fimpara

   para l <- 1 ate 3 faca
      escreval("")
      para c <- 1 ate 5 faca
         escreva ( notas[l,c])
      fimpara
   fimpara

   escreval("menu de opções:")
   escreval("1 - o resultado final de cada aluno:")
   escreval("2 - qual aluno tirou 0 na oat:)
   escreval("3 - qual a media das notas finais dos alunos:")
   escreval("4 - qual aluno tirou a maior nota da vaiii:")
   escreval("5 - alterar as notas de 1 aluno:")
   escreval("6 - encerrar o menu de opções:")
   leia (opcao)

   enquanto (opcao < 1) ou (opcao > 6) faca
      escreval("opcao invalida!!!")
      leia (opcao)
   fimenquanto

   enquanto (opcao <> 6) faca
      se (opcao = 1) entao
         escreval ("o resultado final de cada aluno foi" notas[l,c])

      fimpara
   senao


fimalgoritmo

 

[Simon Viegas]

@Heitor177, segue um esboço para referência:

 

algoritmo "notas"
var
   l,c,opcao :inteiro
   notas: vetor [1..3,1..5] de real
   
   qualquerCoisaSoParaEsperarUmEnter: caractere

inicio

   enquanto (opcao <> 6) faca
      escreval("Menu de opções:")
      escreval("")
      escreval("1 - o resultado final de cada aluno:")
      escreval("2 - qual aluno tirou 0 na oat:")
      escreval("3 - qual a media das notas finais dos alunos:")
      escreval("4 - qual aluno tirou a maior nota da vaiii:")
      escreval("5 - alterar as notas de 1 aluno:")
      escreval("6 - encerrar o menu de opções:")
      leia (opcao)

      enquanto (opcao < 1) ou (opcao > 6) faca
         escreval("opcao invalida!!!")
         leia (opcao)
      fimenquanto

      escolha opcao

      caso 1
         escreval ("o resultado final de cada aluno foi", notas[1, 1])
      caso 2
         escreval ("Aqui tudo do menu 2")
      caso 3
         escreval ("Aqui tudo do menu 3")
      fimEscolha


      leia(qualquerCoisaSoParaEsperarUmEnter)
   fimEnquanto
fimAlgoritmo

 

Qualquer dúvida é só postar.

 

[Heitor177]

@Simon Viegas, você poderia me ajudar com a maior nota na Prova 3? Esse e meu código e não mostra a matrícula correta de quem tirou a maior nota.

 

SE (opcao = 4) entao
   para L <- 1 ate 2 faca
      escreval("")
      PARA C <- 2 ATE 5 FACA
         SE notas[L,4] > maior ENTAO
            maior <- notas[L,4]
         FIMSE
      FIMPARA
   FIMPARA
   ESCREVAL ("O MAIOR VALOR DA V3 foi da matricula: ", notas[L,1] ," NOTA: ", maior)

 

[Simon Viegas]

@Heitor177, uma coisa de cada vez. Cadê o menu?

 

Por favor, poste o que conseguiu fazer e onde está com dúvidas.

 

 

 

 

 

Sobre:

2 horas atrás, Heitor177 disse:

@Simon Viegas, você poderia me ajudar com a maior nota na Prova 3? Esse e meu código e não mostra a matrícula correta de quem tirou a maior nota.

 

Veja o que está sendo utilizado:

2 horas atrás, Heitor177 disse:

ESCREVAL ("O MAIOR VALOR DA V3 foi da matricula: ", notas[L,1] ," NOTA: ", maior)

 

 

Onde está a matrícula do aluno? Pelo que você postou está na "primeira coluna de cada linha". ok!

Mas qual seria o valor de L nesse momento? Veja que o L está sendo utilizado para percorrer o vetor... ele possivelmente estará com 2 sempre (que seria o último valor utilizado no para)!!!, logo, vai sempre exibir notas[2,1], ou seja: a matrícula do último aluno.

 

Se você quer exibir a matrícula da maior nota, uma opção é armazenar a tal da posição. Exemplo:

se (opcao = 4) entao
   maiorV3 <- 0
   para L <- 1 ate 2 faca
      se (notas[L,4] > maiorV3) entao
         maiorV3 <- notas[L,4]
         posMaiorV3 <- L
      fimSe
   fimPara
   escreval("O MAIOR VALOR DA V3 foi da matricula: ", notas[posMaiorV3,1]:1, " NOTA: ", maiorV3:1)
fimSe