Proceso  alumno_reprovado_o_aprovado definir A,B,C,D Como Entero; Escribir "ingese nota 1"; Leer A; Escribir "ingrese nota 2"; Leer B; Escribir "ingrese nota 3"; Leer C; d<-(a+b+c)/3; Escribir "la nota es:",d; Si d>=6 Entonces Escribir " su nota es " , d," es aprovado" ; Sino Escribir " su nota es " , d, " es reprobado"; FinSi FinProceso