-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Leer las calificaciones de N alumnos y determine el número de aprobados y reprobados.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Proceso AprobadosYReprobados
aprobados <- 0;
reprobados <- 0;
Escribir Sin Saltar "Ingresa el valor de calificacion aprobatoria:";
Leer calificacion_aprobatoria;
Escribir Sin Saltar "Ingresa el valor de n:";
Leer n;
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir "PROCESO ", i;
Escribir Sin Saltar "Ingresa el valor de calificacion:";
Leer calificacion;
Si calificacion>=calificacion_aprobatoria Entonces
aprobados <- aprobados+1;
SiNo
reprobados <- reprobados+1;
FinSi
Escribir "";
FinPara
Escribir "Valor de aprobados: ", aprobados;
Escribir "Valor de reprobados: ", reprobados;
FinProceso
aprobados <- 0;
reprobados <- 0;
Escribir Sin Saltar "Ingresa el valor de calificacion aprobatoria:";
Leer calificacion_aprobatoria;
Escribir Sin Saltar "Ingresa el valor de n:";
Leer n;
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir "PROCESO ", i;
Escribir Sin Saltar "Ingresa el valor de calificacion:";
Leer calificacion;
Si calificacion>=calificacion_aprobatoria Entonces
aprobados <- aprobados+1;
SiNo
reprobados <- reprobados+1;
FinSi
Escribir "";
FinPara
Escribir "Valor de aprobados: ", aprobados;
Escribir "Valor de reprobados: ", reprobados;
FinProceso