Proceso sin_titulo
definir nota1,nota2,nota3,promedio Como Real;
Escribir "Ingrese nota1 ";
leer nota1;
Escribir "Ingrese nota2 ";
leer nota2;
Escribir "Ingrese nota3 ";
leer nota3;
promedio<- ((nota1+nota2+nota3)/3);
Escribir "El promedio es de ",promedio;
FinProceso