Question

crie um programa que receba 10 notas e depois calcule e imprima a média ​

Answer 1

Fiz no VisuAlg 3.0:

var

  nome_aluno : caracter

  n1 : real

  soma : real

  media : real

  i:inteiro

inicio

     escreva("Digite o Nome do(a) Aluno(a): ")

     leia(nome_aluno)

     

     enquanto i < 10 faca

     escreval("Digite as Notas do(a) ",nome_aluno)

     leia(n1)

     soma <- soma + n1

     media <- (soma/10)

     i <- i + 1

     fimenquanto

     escreval("A média das notas do(a) ",nome_aluno, " é ",media)

fimalgoritmo