Advertisement
luishh

Untitled

Mar 5th, 2018
82
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.40 KB | None | 0 0
  1. algoritmo "Media1"
  2. // Função :
  3. // Autor :
  4. // Data : 05/03/2018
  5. // Seção de Declarações
  6. var
  7. n1,n2,media:real
  8. inicio
  9. escreva("Digite a primeira nota: ")
  10. leia(n1)
  11. escreva("Digite a segunda nota: ")
  12. leia(n2)
  13. media<-(n1+n2)/2
  14. escreva("A média é = ",media)
  15. Se (media >= 6) entao
  16. escreval(" Aluno aprovado")
  17. senao
  18. escreval(" Aluno Reprovado")
  19. fimse
  20. fimalgoritmo
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement