Algoritmo Notas de 20 alunos

/*
 * Você deve fazer o cálculo da média de 20 alunos, lendo 4 notas por aluno, Escrever mensagem de aprovado, caso a média seja maior ou igual a 7 e de reprovado, caso a mesma seja menor do que 7. Conte os aprovados e os reprovados e imprima ao final.
 */
programa
{

	funcao inicio()
	{
		real media,n1,n2,n3,n4
		inteiro alunos, aprovados, reprovados
		cadeia status
		alunos = 1
		aprovados =0
		reprovados = 0
		enquanto (alunos <=20) {
			escreva ("Digite a nota do aluno: " + alunos + "\n")
			escreva ("Digite a 1º nota do aluno: ")
			leia (n1)
			escreva ("Digite a 2º nota do aluno: ")
			leia (n2)
			escreva ("Digite a 3º nota do aluno: ")
			leia (n3)
			escreva ("Digite a 4º nota do aluno: ")
			leia (n4)
			media = (n1+n2+n3+n4)/4
			se (media >=7) {
				status = "Aprovado"
				aprovados++
			}
			senao {
				status = "Reprovado"
				reprovados++
			}
			escreva ("O aluno " + alunos +" está "+status+ "\n")
			alunos++
		}
		escreva ("Foram aprovados: "+aprovados +"\n")
		escreva ("Foram reprovados: "+reprovados+"\n")
	}
}