Notas de técnicas de programación en lenguaje PSeInt (Pseudocódigo)

Lenguaje

PSeInt (Pseudocódigo)
Descripción

Leer las notas obtenidas por 5 alumnos del curso de técnicas de programación y calcule su nota final de acuerdo a la fórmula empleada por su profesor, según los datos de la tabla. Muestre la nota final del alumno y si está aprobado o no, considerando que la nota mínima aprobatoria es 14.
Código profesor | Fórmula
A | nf=(n1 + n2)/2
B | nf=(n1 + n2*2)/3
C | nf=(n1*2 + n2)/3

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
27
28
29
30
31
32
33
34
35
36
37

Proceso NotasDeTecnicasDeProgramacion

    Para i<-1 Hasta 5 Con Paso 1 Hacer

        Escribir "PROCESO ", i;

        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 "Selecciona el valor de codigo profesor.";

        Escribir "    1.- A";

        Escribir "    2.- B";

        Escribir "    3.- C";

        Escribir Sin Saltar "    :";

        Repetir

            Leer codigo_profesor;

            Si codigo_profesor<1 O codigo_profesor>3 Entonces

                Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";

            FinSi

        Hasta Que codigo_profesor>=1 Y codigo_profesor<=3;

        nota_final <- 0;

        Si codigo_profesor = 1 Entonces

            nota_final <- (nota_1+nota_2)/2;

        FinSi

        Si codigo_profesor = 2 Entonces

            nota_final <- (nota_1+nota_2*2)/3;

        FinSi

        Si codigo_profesor = 3 Entonces

            nota_final <- (nota_1*2+nota_2)/3;

        FinSi

        Si nota_final<14 Entonces

            Escribir "Reprobado";

        SiNo

            Escribir "Aprobado";

        FinSi

        Escribir "Valor de nota final: ", nota_final;

        Escribir "";

    FinPara

FinProceso