VisualG a maior e menor nota estão dando zero

[Lauro Viana]

Var

   media, maior, menor: real
   i: inteiro
   cont_nota, cont_dis : inteiro
   cont_mat, cont_por, cont_geo, cont_fil, cont_his, cont_qui : inteiro
   opc_dis, opc_rep, opc_nota : inteiro
   log_nota : logico
   nota1, nota2, N1, N2: real
   nota, maiornota, menornota : caractere

Inicio
   cont_nota := 0
   log_nota := verdadeiro

   enquanto log_nota faca
      cont_nota := cont_nota + 1
      escreva ("Informe o nome do aluno: ")
      leia (nota)

      repita
         cont_dis := cont_dis + 1
         escreval ("--------------------")
         escreval ("1-matemática")
         escreval ("2-portugues")
         escreval ("3-geografia")
         escreval ("4-Filosofia")
         escreval ("5-historia")
         escreval ("6-quimica")
         escreval ("--------------------")
         escreva  ("Informe qual a disciplina: ")
         leia (opc_dis)

         escolha opc_dis
         caso 1
            cont_mat := cont_mat
         caso 2
            cont_por := cont_por
         caso 3
            cont_geo := cont_geo
         caso 4
            cont_fil := cont_fil
         caso 5
            cont_his := cont_his
         caso 6
            cont_qui := cont_qui
         fimescolha
         ESCREVAL("SISTEMA DE MÉDIAS")
         ESCREVA("DIGITE A PRIMEIRA NOTA: ")
         LEIA(N1)
         ESCREVA("DIGITE A SEGUNDA NOTA: ")
         LEIA(N2)
         MEDIA <- (N1 + N2 ) / 2
         SE MEDIA >= 7 ENTAO
            ESCREVAL("ALUNO APROVADO!")
         SENAO
            SE MEDIA <= 3 ENTAO
               ESCREVAL("ALUNO REPROVADO!")
            SENAO
               SE MEDIA <=5 ENTAO
                  ESCREVAL("ALUNO EM RECUPERAÇÃO...")
               FIMSE
            FIMSE
         FIMSE

         se N1 > N2 entao
            maior:= N1
         senao
            se N1 < N2 entao
               menor:= N1

               se N2 > N1 entao
                  maior:= N2
               senao
                  se N2 < N1 entao
                     menor:=N2
                  fimse
               fimse
            fimse
         fimse

         escreval("")
         escreval("A média do(a) aluno(a) é:", media)
         escreval("A maior nota do(a) aluno(a) é:", maior)
         escreval("A menor nota do(a) aluno(a) é:", menor)

         escreva ("Deseja informar outra disciplina? (1-Sim ou 2-Não): ")
         leia (opc_rep)

         //RESUMO DA MEDIA
         escreval ("====================================")
         escreval (nota)
         escreval ("====================================")
         escreval ("A média de matemática: ", media)
         escreval ("A média de português: ",media)
         escreval ("A média de geografia: ",media)
         escreval ("A média de filosofia: ",media)
         escreval ("A média de história: ",media)
         escreval ("A média de química: ",media)
         escreval ("====================================")
         escreval ("A nota total: ",cont_nota," nota: ",cont_dis)
         escreval ("")
         escreval ("")

         escreva ("Deseja informar outro aluno? (1-Sim ou 2-Não)")
         leia (opc_nota)
         se opc_nota = 2 entao
            log_nota := falso
         fimse

Fimalgoritmo

[kgin]

Poste o enunciado e descreva o seu problema.

[Lauro Viana]

quero fazer a maior, menor e a média de um aluno, entretanto, a maior e menor nota deste tal aluno está ficando zerada

[kgin]

@Lauro Viana Aqui tá normal

 

e não existe disciplina 0

37 minutos atrás, Lauro Viana disse:

 

58 minutos atrás, Lauro Viana disse:

         escreval ("1-matemática")
         escreval ("2-portugues")
         escreval ("3-geografia")
         escreval ("4-Filosofia")
         escreval ("5-historia")
         escreval ("6-quimica")

 

Porque está tão complicado se é só um programa de media?

[Lauro Viana]

@kgin na verdade é um código mais longo, só que eu estava achando estranho o porque das notas estarem dando zero.

 na minha máquina ainda está dando zero mesmo mudando o numero da disciplina, mas mesmo assim agradeço.

[kgin]

Pode ser algo na versão que você está desenvolvendo agora.

Poste novamente o algoritmo.