sábado, 30 de outubro de 2010

Lista dia 25 de outubro -1-)Faça um programa que calcule a média aritmética de 35 alunos do curso de Algoritmos. Use comandos de repetição.

algoritmo "Média"

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 média dos 35 alunos eh: ", media:5:2)
fimalgoritmo

Nenhum comentário:

Postar um comentário