ejercicio 8 de Speint : ¿como sacar un promedio de 5 estudiantes de la UGB?

Proceso Notas
definir a,b,c,d,e,f,g,h como real;


Para a<-1 Hasta 5 Con Paso 1 Hacer
Escribir "Estudiante ", a;
Escribir "Ingresese Lab1";
Leer b;
si b<=10 & b>=0 entonces
Escribir "Nota Valida";
Sino
Repetir
Escribir "Ingresese Lab1";
Leer b;
Hasta Que b<=10 & b>=0
FinSi
Escribir "Ingrese Lab2";
Leer c;
si c<=10 & c>=0 entonces
Escribir "Nota Valida";
Sino
Repetir
Escribir "Ingresese Lab2";
Leer c;
Hasta Que c<=10 & c>=0
finsi
Escribir "Ingrese Parcial";
Leer d;
si d<=10 & d>=0 entonces
Escribir "Nota Valida";
Sino
Repetir
Escribir "Ingresese Parcial";
Leer d;
Hasta Que d<=10 & d>=0
FinSi

e<-b*0.30;
f<-c*0.30;
g<-d*0.40;
h<-e+f+g;
Escribir "Promedio: ", h;
FinPara

FinProceso