var QTDALUNOS, QTDNOTAS, NOTAS, MEDIA, MEDIATURMA, NUMAPROVADOS, NUMREPROVADOS, NUMRECUPERACAO, SOMA:INTEIRO CONTADOR:inteiro NOME: literal inicio // Seção de Comandos NUMAPROVADOS <- 0 NUMREPROVADOS <- 0 NUMRECUPERACAO <- 0 MEDIATURMA <- 0 ENQUANTO CONTADOR = QTDALUNOS FACA ESCREVA("QUANTIDADE DE NOTAS:") LEIA(QTDNOTAS) ESCREVA("NOME DO ALUNO:") LEIA(NOME) QTDALUNOS <- QTDALUNOS + 1 limpatela para NOTAS de 1 ate QTDNOTAS faca ESCREVA("DIGITE AS NOTAS:") LEIA(NOTAS) limpatela SOMA <- (SOMA + NOTAS) fimpara