PUNTO 1
cadena[40] nombre
real nota_definitiva
entero codigo
inicio
escriba "codigo del alumno o cero(0) para salir: "
lea codigo
mientras codigo<>0 haga
escriba "Ingrese el nombre del alumno: "
lea nombre
escriba "la nota definitiva del alumno para la materia de estadistica es: "
lea nota_definitiva
si nota_definitiva>=3.0 entonces
escriba "aprobo estadistica"
sino
escriba "reprobo estadistica"
fin si
llamar nueva_linea
escriba "ingrese el nombre del alumno o cero(0) para salir"
lea codigo
fin mientras
fin
PUNTO 2
cadena[40] nombre
