• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Dados N valores, haga el siguiente proceso:
    - Si el valor es menor que cero calcular su cubo.
    - Si el valor está entre 0 y 100 calcular su cuadrado.
    - Si el valor está entre 101 y 1000 calcular su raíz cuadrada.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Proceso CuboCuadradoORaiz
    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 v:";
        Leer v;
        resultado <- 0;
        Si v<0 Entonces
            resultado <- v*v*v;
        FinSi
        Si v>=0 Y v<=100 Entonces
            resultado <- v*v;
        FinSi
        Si v>=101 Y v<=1000 Entonces
            resultado <- RC(v);
        FinSi
        Escribir "Valor de resultado: ", resultado;
        Escribir "";
    FinPara
FinProceso