• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Se tiene un recipiente cilíndrico de radio r y altura h y una caja de ancho a, largo b y altura c. Se desea saber cuál de ellos tiene mayor capacidad de almacenamiento.

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 CapacidadDeUnRecipienteYUnaCaja
    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 h:";
    Leer h;
    Escribir Sin Saltar "Ingresa el valor de r:";
    Leer r;
    volumen_recipiente <- PI*r*r*h;
    volumen_caja <- a*b*c;
    Si volumen_recipiente>volumen_caja Entonces
        Escribir "El recipiente cilíndrico tiene mayor capacidad";
    FinSi
    Si volumen_recipiente = volumen_caja Entonces
        Escribir "Tienen la misma capacidad";
    FinSi
    Si volumen_recipiente<volumen_caja Entonces
        Escribir "La caja tiene mayor capacidad";
    FinSi
    Escribir "Valor de volumen caja: ", volumen_caja;
    Escribir "Valor de volumen recipiente: ", volumen_recipiente;
FinProceso