algoritmo "Media"
var
media, nota, soma:real
i:inteiro
inicio
soma <- 0
para i de 1 ate 35 faca
escreva ("Digite a", i, "a nota:")
leia (nota)
soma <- soma+nota
fimpara
media <- soma/35
escreva ("A media e igual a", media)
fimalgoritmo
Nenhum comentário:
Postar um comentário