Proceso elio
	Escribir "el numero de persona que va a calificar"
	Leer b
	a<-4
	n<-1
	sum<-0
	Mientras n<=a Hacer
		Escribir  "ingrese la calificacion"
		Leer c1
		suma<-c1+suma
		n<-n+1
	FinMientras
	Escribir "la suma es: ", suma
	pru<-(suma/a)
	Escribir "promedio es: ", pru
	Si pru<14 Entonces
		Escribir "reprobado"
	Sino
		Escribir "aprobado"
	FinSi
	
FinProceso