• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Genere 10 notas del 1 al 20. Deberá mostrar la nota mas alta y la mas baja. Las notas se dividen por rangos:
    a. 1-5 muy bajas
    b. 6-10 bajas
    c. 11-15 altas
    d. 16-20 muy altas
    El programa mostrará cuantas pertenecen a cada rango.

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
Proceso RangosDeNotas
    nota_mas_alta <- 0;
    nota_mas_baja <- 0;
    rango_a <- 0;
    rango_b <- 0;
    rango_c <- 0;
    rango_d <- 0;
    Para i<-1 Hasta 10 Con Paso 1 Hacer
        Escribir "PROCESO ", i;
        Escribir Sin Saltar "Ingresa el valor de randomize:";
        Leer randomize;
        nota <- 1+randomize(20);
        Si i = 1 O nota_mas_alta<nota Entonces
            nota_mas_alta <- nota;
        FinSi
        Si i = 1 O nota_mas_baja>nota Entonces
            nota_mas_baja <- nota;
        FinSi
        Si nota>=1 Y nota<=5 Entonces
            rango_a <- rango_a+1;
            Escribir "Muy baja";
        FinSi
        Si nota>=6 Y nota<=10 Entonces
            rango_b <- rango_b+1;
            Escribir "Baja";
        FinSi
        Si nota>=11 Y nota<=15 Entonces
            rango_c <- rango_c+1;
            Escribir "Alta";
        FinSi
        Si nota>=16 Y nota<=20 Entonces
            rango_d <- rango_d+1;
            Escribir "Muy alta";
        FinSi
        Escribir "Valor de nota: ", nota;
        Escribir "";
    FinPara
    Escribir "Valor de nota mas alta: ", nota_mas_alta;
    Escribir "Valor de nota mas baja: ", nota_mas_baja;
    Escribir "Valor de rango a: ", rango_a;
    Escribir "Valor de rango b: ", rango_b;
    Escribir "Valor de rango c: ", rango_c;
    Escribir "Valor de rango d: ", rango_d;
FinProceso