Pseint - Promedio de Notas
Proceso Promedio_Notas
definir M1,M2,N1,N2,N3,N4,M1t,M2t,v,v2,v3,v4,Pm como real;
definir nom_est,mat1,mat2 como caracter;
escribir "Nombre del estudiante";
leer nom_est;
escribir "Nombre de la Materia1";
leer mat1;
escribir "Nota1";
leer N1;
Escribir "Nota2";
leer N2;
v<- n1*40/100;
v2<- n2*60/100;
M1<- v+v2;
escribir "Definitiva de la Materia1";
escribir m1;
escribir "Nombre de la Materia2";
leer mat2;
escribir "Nota1";
leer n3;
escribir "Nota2";
leer n4;
v3<- n3*40/100;
v4<- n4*60/100;
m2<- v3+v4;
escribir "Definitiva de la Materia2";
escribir m2;
pm<- (m1+m2)/2;
escribir "Promedio del Estudiante"
escribir pm;
FinProceso
definir M1,M2,N1,N2,N3,N4,M1t,M2t,v,v2,v3,v4,Pm como real;
definir nom_est,mat1,mat2 como caracter;
escribir "Nombre del estudiante";
leer nom_est;
escribir "Nombre de la Materia1";
leer mat1;
escribir "Nota1";
leer N1;
Escribir "Nota2";
leer N2;
v<- n1*40/100;
v2<- n2*60/100;
M1<- v+v2;
escribir "Definitiva de la Materia1";
escribir m1;
escribir "Nombre de la Materia2";
leer mat2;
escribir "Nota1";
leer n3;
escribir "Nota2";
leer n4;
v3<- n3*40/100;
v4<- n4*60/100;
m2<- v3+v4;
escribir "Definitiva de la Materia2";
escribir m2;
pm<- (m1+m2)/2;
escribir "Promedio del Estudiante"
escribir pm;
FinProceso
Comentarios
Publicar un comentario