• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Calcule el valor de R de acuerdo a la siguiente relación:
    R = (A * B) / (C * D) Si X * Y > 0
    R = (A + B) / (C + D) Si X * Y = 0
    R = (A + B) – C + D Si X * Y < 0

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
Proceso ValorDeR
    Escribir Sin Saltar "Ingresa el valor de A:";
    Leer A;
    Escribir Sin Saltar "Ingresa el valor de B:";
    Leer B;
    Escribir Sin Saltar "Ingresa el valor de C:";
    Leer C;
    Escribir Sin Saltar "Ingresa el valor de D:";
    Leer D;
    Escribir Sin Saltar "Ingresa el valor de X:";
    Leer X;
    Escribir Sin Saltar "Ingresa el valor de  Y:";
    Leer _Y;
    R <- 0;
    Si X*_Y>0 Entonces
        R <- (A*B)/(C*D);
    FinSi
    Si X*_Y = 0 Entonces
        R <- (A+B)/(C+D);
    FinSi
    Si X*_Y<0 Entonces
        R <- (A+B)-C+D;
    FinSi
    Escribir "Valor de R: ", R;
FinProceso