terça-feira, 2 de novembro de 2010

LD1-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 “media”
Var
    media,soma,nota: real
    i: inteiro
Inicio
    soma <- 0
    i <- 1
    Repita
        Escreva(“Informe a nota do “, i, ”o. aluno: ”)
        Leia(nota)
        soma <- soma + nota
        i <- i + 1
    Ate(i>35)
    media <- soma/35
    Escreva(“A media dos 35 alunos e ”, media)
Fimalgoritmo

Nenhum comentário:

Postar um comentário