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