• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Obtiene el menor, mayor, suma, promedio posición del menor, posición del mayor, cantidad de aprobados, porcentaje de aprobados, cantidad de reprobados y porcentaje de reprobados de una serie de N números.

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
Algoritmo EstadisticaN
    calificacion_aprobatoria <- 7;

    aprobados <- 0;
    maximo <- 0;
    minimo <- 0;
    porcentaje_aprobados <- 0;
    porcentaje_reprobados <- 0;
    posicion_mayor <- 0;
    posicion_menor <- 0;
    promedio <- 0;
    reprobados <- 0;
    suma <- 0;
    Escribir "Ingrese el número de elementos (n):";
    Leer n;
    Para i<-1 Hasta n Con Paso 1 Hacer
        Escribir "Ingrese el valor del elemento ", i, ":";
        Leer elemento;
        Si i=1 O elemento<minimo Entonces
            minimo <- elemento;
            posicion_menor <- i;
        FinSi
        Si i=1 O elemento>maximo Entonces
            maximo <- elemento;
            posicion_mayor <- i;
        FinSi
        Si elemento < calificacion_aprobatoria Entonces
            reprobados <- reprobados + 1;
        Sino
            aprobados <- aprobados + 1;
        FinSi
        suma<-suma + elemento;
    FinPara
    Si n > 0 Entonces
        promedio <- suma / n;
        porcentaje_aprobados  <- 100.0 * aprobados  / n;
        porcentaje_reprobados <- 100.0 * reprobados / n;
    FinSi
    Escribir "";
    Escribir "Menor             : ", minimo;
    Escribir "Posición del menor: ", posicion_menor;
    Escribir "Mayor             : ", maximo;
    Escribir "Posición del mayor: ", posicion_mayor;
    Escribir "Suma              : ", suma;
    Escribir "Promedio          : ", promedio;
    Escribir "Media aritmética  : ", promedio;
    Escribir "Aprobados         : ", aprobados;
    Escribir "Porcen. aprobados : ", porcentaje_aprobados , "%";
    Escribir "Reprobados        : ", reprobados;
    Escribir "Porcen. reprobados: ", porcentaje_reprobados, "%";
FinAlgoritmo