Promedio versión II
Pseudocodigo
Proceso promedioNotas
// Entrada: a
// Auxiliar;aprob,reprob, aprobados, reprobados
// salida; prom
// Author: @soytipazo
Definir a,b,aprob,reprob,prom,indexa,indexb Como Entero
Escribir '=== Sistema notas, con promedio ==='
Escribir 'Cantidad de notas a ingresar'
Leer a
aprob<-0
reprob<-0
prom<-0
indexa<-0
indexb<-0
Dimension aprobados(a)
Dimension reprobados(a)
Para i<-1 Hasta a Hacer
Escribir 'ingrese la ',i,' nota'
Leer b
Si b>61 Entonces
indexa<-indexa+1
aprobados(indexa)<-((b))
aprob<-aprob+1
Sino
indexb<-indexb+1
reprobados(indexb)<-((b))
reprob<-reprob+1
FinSi
prom<-prom+b
FinPara
Escribir 'Total de aprobados: ',aprob
Para i<-1 Hasta a Hacer
Si aprobados(i)>61 Entonces
Si aprobados(i)>=61 Y aprobados(i)<=89 Entonces
Escribir aprobados(i),' Status: B'
FinSi
Si aprobados(i)>=90 Entonces
Escribir aprobados(i),' Status: A'
FinSi
FinSi
FinPara
Escribir ''
Escribir 'Total de reprobados: ',reprob
Para c<-1 Hasta a Hacer
Si reprobados(c)<61 Y reprobados(c)!=0 Entonces
Escribir reprobados(c),' Status: C'
FinSi
FinPara
Escribir 'El promedio de las notas es: ',prom/a
FinProceso