PSEUDOCÓDIGO

 5. Calcular el área de un trapecio.

 

 Leer altura;
        Escribir Sin Saltar "Ingresa el valor de base mayor:";
        Leer base_mayor;
        Escribir Sin Saltar "Ingresa el valor de base menor:";
        Leer base_menor;
        area <- (base_mayor+base_menor)*altura/2;
        Escribir "Valor de area: ", area;
        Escribir "";
        Repetir
            Escribir Sin Saltar "¿Deseas repetir el proceso? (S/N):";
            Leer tecla_repetir;
        Hasta Que tecla_repetir='s' O tecla_repetir='n' O tecla_repetir='S' O tecla_repetir='N'
    Hasta Que tecla_repetir='n' O tecla_repetir='N'
FinProceso

 

6. Calcular el área de un círculo.

 

Leer radio;
    circunferencia <- 2.0*PI*radio;
    perimetro <- circunferencia;
    area <- PI*radio*radio;
    Escribir "Valor de area: ", area;
    Escribir "Valor de circunferencia: ", circunferencia;
    Escribir "Valor de perimetro: ", perimetro;
FinProceso

 

7. Calcular el área y perímetro de un cuadrado.

 

 Leer lado;
    area <- lado*lado;
    perimetro <- lado*4;
    Escribir "Valor de area: ", area;
    Escribir "Valor de perimetro: ", perimetro;
FinProceso

 

 

8. Calcular el área y perímetro de un rectángulo.

 

Leer altura;
    Escribir Sin Saltar "Ingresa el valor de base:";
    Leer base;
    area <- altura*base;
    perimetro <- altura+base+altura+base;
    Escribir "Valor de area: ", area;
    Escribir "Valor de perimetro: ", perimetro;
FinProceso