Proceso CalculoNotaFinal
    Definir nombre Como Caracter;
    Definir cantidad,finalizar, opcion,i Como Entero;
    Definir nota1,nota2,nota3 Como Real;
    Definir ponderacion1,ponderacion2,ponderacion3,sumaPonderacion, sumaTotalPonderaciones Como Real;
    
    finalizar<-0;
    
    Escribir "**********Bienvenido**********";
    Repetir
        Escribir  "***Menú***";
        Escribir  "1. Calcular Nota Final";
        Escribir  "2. Finalizar Calculo";
        Leer opcion;
        Segun opcion Hacer
            1:
                Limpiar Pantalla;
                Escribir "Ingrese la cantidad de alumnos que desea calcular su nota";
                Leer cantidad;
                Para i<-1 Hasta cantidad Con Paso 1 Hacer
                    Escribir "Ingrese el nombre del alumno: ",i;
                    Leer nombre;
                    Escribir "Ingrese la nota 1 del alumno: ",i;
                    Leer nota1;
                    Escribir "Ingrese la nota 2 del alumno: ",i;
                    Leer nota2;
                    ponderacion1 = nota1 * 0.3;
                    ponderacion2 = nota2 * 0.3;
                    sumaPonderacion = ponderacion1+ponderacion2;
                    nota3 = 4.0 - sumaPonderacion;
                    ponderacion3 = nota3;
                    nota3 = nota3 / 0.4;
                    sumaTotalPonderaciones = ponderacion1+ponderacion2+ponderacion3;
                    
                    Escribir "El alumno: ",i,".- ",nombre," requiere un ",nota3," para aprobar el ramo";
                FinPara
                
            2:
                Limpiar Pantalla;
                finalizar = 1;
            De Otro Modo:
                Escribir "Opción ingresada es invalida";
        FinSegun
    Hasta Que finalizar <> 0
FinProceso