VisualG Lógica de programação exercício pseudocódigo

[melopark]

Olá pessoal, alguém pode me ajudar? Estou tendo problema com esse código sou iniciante e não estou compreendo porque estar dando erro, quando executo dar erro. 

 

Em uma escola, foi solicitado que criasse um programa que lesse as notas dos quatro bimestres de um determinado aluno e que se a média fosse acima de 6 estaria aprovado, caso não alcançasse, estaria reprovado.

 

algoritmo "media_aluno"
var
   n1, n2, n3, n4 : inteiro
   media: real
   aluno : caracter
inicio
   escreva ("Digite o nome do aluno: ")
   leia (aluno)
   escreva ("Digite a Primeira nota: ")
   leia (n1)
   escreva ("Digite a Segunda nota : ")
   leia (n2)
   escreva ("Digite a Terceira nota: ")
   leia (n3)
   escreva ("Digite a Quarta nota  : ")
   leia (n4)
   media <= (n1 + n2+ n3 + n4) / 4
   escreva ("A média final é: ", media)
   se media <- 6 entao
      Escreva (" O aluno ",aluno, " passou !")
   senao
      escreva (" O aluno ",aluno, " reprovou")
   fimse
fimalgoritmo

 

[Matheus Dutra]

@melopark Então, eu também sou iniciante em algoritmo, eu fiz do meu jeito, se quiser dar uma olhada  : 

 

programa {
    funcao inicio() {
        inteiro n1, n2, n3, n4 
        real media 
        caracter aluno 

  escreva ("Digite o nome do aluno: ")
  leia (aluno)

  escreva ("Digite a Primeira nota: ")
  leia (n1)

  escreva ("Digite a Segunda nota : ")
  leia (n2)

  escreva ("Digite a Terceira nota: ")
  leia (n3)

  escreva ("Digite a Quarta nota  : ")
  leia (n4)

  media = (n1 + n2+ n3 + n4) / 4

  escreva ("A média final é: ", media)

  se(media >= 6){

  escreva (" O aluno " , aluno , " passou !")
  }
  
  senao
  escreva (" O aluno " , aluno , " reprovou")
    }
}

o que eu mudei foi, coloquei no começo o "inteiro, real, caracter" antes do "n1, media, aluno"

eu também mudei o valor da media, eu coloquei apenas = 

e coloquei os " {  } " depois do "se(media>=6)" e fechando depois do escreva, e também mudei o se, ao invés de colocar "se media <- 6 entao" coloquei "se(media>=6)"

se quiser observar essas mudanças.

eu não entendo muito, mas se quiser observar essas mudanças enquanto alguém que entende mais não aparece para tirar sua duvida, é isso, espero que te ajude

@melopark mas o que estava causando problema era, a falta do " { } " no " se ", o <= na media, e voce tinha escrito escreva com o "e" maiúsculo, e tem que ser minúsculo para o portugol reconhecer o comando

[Simon Viegas]

20 horas atrás, melopark disse:

quando executo dar erro. 

 

Qual erro? Seria bom citá-lo.

 

Vamos lá:

Testei aqui e deu esse erro:

 

Se for esse o problema, é que deveria utilizar "<-", em vez de "<=". 

 

Segue:

Atual:

20 horas atrás, melopark disse:

media <= (n1 + n2+ n3 + n4) / 4

 

 

Correto:

media <- (n1 + n2 + n3 + n4) / 4

 

 

 

Outro problema análogo está no se/entao.

 

Em vez de:

20 horas atrás, melopark disse:

se media <- 6 entao

 

Usar algo como:

se media >= 6 entao

 

 

 

@Matheus Dutra, seu código é para Portugol Studio, né?

 

São "sistemas diferentes". O código do @melopark é para VisualG. Ambos utilizam "Portugol", mas as sintaxes são diferentes entre si.

[Matheus Dutra]

@Simon Viegas Sim, o meu é Portugol Studio, obrigado por corrigir.