-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Muestre de 3 notas de un alumno, cuántas tiene aprobadas y cuántas desaprobadas.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Proceso NotasAprobadasYDesaprobadas
Escribir Sin Saltar "Ingresa el valor de calificacion aprobatoria:";
Leer calificacion_aprobatoria;
Escribir Sin Saltar "Ingresa el valor de nota 1:";
Leer nota_1;
Escribir Sin Saltar "Ingresa el valor de nota 2:";
Leer nota_2;
Escribir Sin Saltar "Ingresa el valor de nota 3:";
Leer nota_3;
aprobadas <- 0;
desaprobadas <- 0;
Si nota_1<calificacion_aprobatoria Entonces
desaprobadas <- desaprobadas+1;
aprobadas <- aprobadas+1;
FinSi
Si nota_2<calificacion_aprobatoria Entonces
desaprobadas <- desaprobadas+1;
aprobadas <- aprobadas+1;
FinSi
Si nota_3<calificacion_aprobatoria Entonces
desaprobadas <- desaprobadas+1;
aprobadas <- aprobadas+1;
FinSi
Escribir "Valor de aprobadas: ", aprobadas;
Escribir "Valor de desaprobadas: ", desaprobadas;
FinProceso
Escribir Sin Saltar "Ingresa el valor de calificacion aprobatoria:";
Leer calificacion_aprobatoria;
Escribir Sin Saltar "Ingresa el valor de nota 1:";
Leer nota_1;
Escribir Sin Saltar "Ingresa el valor de nota 2:";
Leer nota_2;
Escribir Sin Saltar "Ingresa el valor de nota 3:";
Leer nota_3;
aprobadas <- 0;
desaprobadas <- 0;
Si nota_1<calificacion_aprobatoria Entonces
desaprobadas <- desaprobadas+1;
aprobadas <- aprobadas+1;
FinSi
Si nota_2<calificacion_aprobatoria Entonces
desaprobadas <- desaprobadas+1;
aprobadas <- aprobadas+1;
FinSi
Si nota_3<calificacion_aprobatoria Entonces
desaprobadas <- desaprobadas+1;
aprobadas <- aprobadas+1;
FinSi
Escribir "Valor de aprobadas: ", aprobadas;
Escribir "Valor de desaprobadas: ", desaprobadas;
FinProceso