Pseudocódigo

 PSEUDOCÓDIGO

Algoritmo: Calculadora_Geometrica

Variables: twd, trd, AboutUs : Void

            opcion, radio, Base, base, altura, lado, Diagonal, diagonal : Entero

            area_base, area_lateral, area_total, apotema, pb, lado_base, altura_base, arista, apotema_base, altura, largo, ancho, radio, generatriz : Real

            O_Circulo=1, O_Triangulo=2, O_Cuadrado=3, O_Rectangulo=4, O_Paralelogramo=5, O_Rombo=6, O_Trapecio=7, O_Pentagono=8, O_Hexagono=9, O_Heptagono=10, O_Octagono=11, O_Nonagono=12, O_Decagono=13, O_Volver=14 : Constante Entera

            O_Cubo=1, O_Piramide_Triangular=2, O_Piramide_Cuadrangular=3, O_Piramide_Pentagonal=4, O_Piramide_Hexagonal=5, O_Prisma_Triangular=6, O_Prisma_Rectangular=7, O_Prisma_Pentagonal=8, O_Prisma_Hexagonal=9, O_Paralelepipedo=10, O_Cono=11, O_Cilindro=12, O_Esfera=13, O_Volver=14 : Constante Entera

            PI=3.14 : Constante Real

Inicio

            Escribir (“Calculadora de Figuras Geométricas”)

            Escribir (“¿Con qué tipo de figuras desea trabajar?”)

            Escribir (“(1) 2D”)

            Escribir (“(2) 3D”)

            Escribir (“(3) Acerca de Nosotros”)

            Escribir (“(4) Salir”)

            Escribir (“Ingresa tu elección (1-4):”)

            Leer (opcion)

            Hacer

                        Según opcion hacer

                                    Caso C_2D:

                                               twd

                                    Caso C_3D:

                                               trd

                                    Caso C_AboutUs:

                                               AboutUs

                                    Caso C_Salir:

                                               Escribir (“Saliendo del programa...”)

                                    Otro:

                                               Escribir (“Las opciones válidas son del 1 al 3.”)

                                               Escribir (“Vuelva a intentarlo.”)

                        Fin_Segun

            Mientras (opcion≠4)

Fin

Función: twd

Inicio

            Escribir (“Calculadora de Figuras Geométricas”)

            Escribir (“¿Con qué tipo de figuras desea trabajar?”)

            Escribir (“(1) Círculo”)

            Escribir (“(2) Triángulo”)

            Escribir (“(3) Cuadrado”)

            Escribir (“(4) Rectángulo”)

            Escribir (“(5) Paralelogramo”)

            Escribir (“(6) Rombo”)

            Escribir (“(7) Trapecio”)

            Escribir (“(8) Pentágono”)

            Escribir (“(9) Hexágono”)

            Escribir (“(10) Heptágono”)

            Escribir (“(11) Octágono”)

            Escribir (“(12) Nonágono”)

            Escribir (“(13) Decágono”)

            Escribir (“(14) ß Volver”)

            Escribir (“Ingresa tu elección (1-14):”)

            Leer (opcion)

            Según opcion hacer

                        Caso O_Círculo:

                                    Escribir (“Ingresa el radio del Círculo: ”)

                                    Leer (radio)

                                    Mientras (radio<=0) hacer

                                               Escribir (“El radio no puede ser negativo o cero.”)

                                               Escribir (“Inténtelo de nuevo…”)

                                               Leer (radio)

                                    Fin_Mientras

                                    Escribir (“El área del Círculo es igual a: ”, PI*pow(radio,2), “cm²”)

                        Caso O_Triangulo:

                                    Escribir (“Ingresa la base del Triángulo: ”)

                                    Leer (base)

                                    Mientras (base<=0) hacer

                                               Escribir (“La base no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (base)

                                    Fin_Mientras

                                    Escribir (“Ingresa la altura del Triángulo: ”)

                                    Leer (altura)

                                    Mientras (altura<=0) hacer

                                               Escribir (“La altura no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (altura)

                                    Fin_Mientras

                                    Escribir (“El área del Triángulo es igual a: ”, (base*altura)/2, “cm²”)

                        Caso O_Cuadrado:

                                    Escribir (“Ingresa el lado del Cuadrado: ”)

                                    Leer (lado)

                                    Mientras (lado<=0) hacer

                                               Escribir (“El lado no puede ser negativo o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (lado)

                                    Fin_Mientras

                                    Escribir (“El área del Cuadrado es igual a: ”, pow(lado*2), “cm²”)

                        Caso O_Rectangulo:

                                    Escribir (“Ingresa la base del Rectángulo: ”)

                                    Leer (altura)

                                    Mientras (altura<=0) hacer

                                               Escribir (“La altura no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (altura)

                                    Fin_Mientras

                                    Escribir (“Ingresa la altura del Rectángulo: ”)

                                    Leer (altura)

                                    Mientras (altura<=0) hacer

                                               Escribir (“La altura no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (altura)

                                    Fin_Mientras

                                    Escribir (“El área del Rectángulo es igual a: ”, base*altura, “cm²”)

                        Caso O_Paralelogramo:

                                    Escribir (“Ingresa la base del Paralelogramo: ”)

                                    Leer (base)

                                    Mientras (base<=0) hacer

                                               Escribir (“La base no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (base)

                                    Fin_Mientras

                                    Escribir (“Ingresa la altura del Paralelogramo: ”)

                                    Leer (altura)

                                    Mientras (altura<=0) hacer

                                               Escribir (“La altura no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (altura)

                                    Fin_Mientras

                                    Escribir (“El área del Paralelogramo es igual a: ”, base*altura, “cm²”)

                        Caso O_Rombo:

                                    Escribir (“Ingresa la diagonal mayor del Rombo: ”)

                                    Leer (Diagonal)

                                    Mientras (Diagonal<=0) hacer

                                               Escribir (“La diagonal mayor no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (Diagonal)

                                    Fin_Mientras

                                    Escribir (“Ingresa la diagonal menor del Rombo: ”)

                                    Leer (diagonal)

                                    Mientras (diagonal<=0 OR diagonal>=Diagonal) hacer

                                               Escribir (“La diagonal menor no puede ser mayor o igual que la diagonal mayor, negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (diagonal)

                                    Fin_Mientras

                                    Escribir (“El área del Rombo es igual a: ”, (Diagonal*diagonal)/2, “cm²”)

 

                        Caso O_Trapecio:

                                    Escribir (“Ingresa la base mayor del Trapecio: ”)

                                    Leer (Base)

                                    Mientras (Base<=0) hacer

                                               Escribir (“La base mayor no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (Base)

                                    Fin_Mientras

                                    Escribir (“Ingresa la base menor del Trapecio: ”)

                                    Leer (base)

                                    Mientras (base<=0 OR base>=Base) hacer

                                               Escribir (“La base menor no puede ser mayor o igual que la base mayor, negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (base)

                                    Fin_Mientras

                                    Escribir (“Ingresa la altura del Trapecio: ”)

                                    Leer (altura)

                                    Mientras (altura<=0) hacer

                                               Escribir (“La altura no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (altura)

                                    Fin_Mientras

                                    Escribir (“El área del Trapecio es igual a: ”, (Base*base*altura)/2, “cm²”)

                        Caso O_Pentagono:

                                    Escribir (“Ingresa el lado del Pentágono: ”)

                                    Leer (lado)

                                    Mientras (lado<=0) hacer

                                               Escribir (“El lado no puede ser negativo o cero.”)

                                               Escribir (“Inténtelo de nuevo…”)

                                               Leer (lado)

                                    Fin_Mientras

                                    Escribir (“El área del Pentágono es igual a: ”, (pow(lado,2)*sqrt(5*(5+(2*sqrt(5)))))/4, “cm²”)

                        Caso O_Hexagono:

                                    Escribir (“Ingresa el lado del Hexágono: ”)

                                    Leer (lado)

                                    Mientras (lado<=0) hacer

                                               Escribir (“El lado no puede ser negativo o cero.”)

                                               Escribir (“Inténtelo de nuevo…”)

                                               Leer (lado)

                                    Fin_Mientras

                                    Escribir (“El área del Hexágono es igual a: ”, (pow(lado,2)*3*sqrt(3))/2 “cm²”)

                        Caso O_Heptagono:

                                    Escribir (“Ingresa el lado del Heptágono: ”)

                                    Leer (lado)

                                    Mientras (lado<=0) hacer

                                               Escribir (“El lado no puede ser negativo o cero.”)

                                               Escribir (“Inténtelo de nuevo…”)

                                               Leer (lado)

                                    Fin_Mientras

                                    Escribir (“El área del Heptágono es igual a: ”, (7*pow(lado,2)*2.07)/4, “cm²”)

                        Caso O_Octagono:

                                    Escribir (“Ingresa el lado del Octágono: ”)

                                    Leer (lado)

                                    Mientras (lado<=0) hacer

                                               Escribir (“El lado no puede ser negativo o cero.”)

                                               Escribir (“Inténtelo de nuevo…”)

                                               Leer (lado)

                                    Fin_Mientras

                                    Escribir (“El área del Octágono es igual a: ”, 2*(1+sqrt(2))*pow(lado,2), “cm²”)

                        Caso O_Nonagono:

                                    Escribir (“Ingresa el lado del Nonágono: ”)

                                    Leer (lado)

                                    Mientras (lado<=0) hacer

                                               Escribir (“El lado no puede ser negativo o cero.”)

                                               Escribir (“Inténtelo de nuevo…”)

                                               Leer (lado)

                                    Fin_Mientras

                                    Escribir (“El área del Nonágono es igual a: ”, 9*pow(lado,2)*2.74, “cm²”)

                        Caso O_Decagono:

                                    Escribir (“Ingresa el lado del Decágono: ”)

                                    Leer (lado)

                                    Mientras (lado<=0) hacer

                                               Escribir (“El lado no puede ser negativo o cero.”)

                                               Escribir (“Inténtelo de nuevo…”)

                                               Leer (lado)

                                    Fin_Mientras

                                    Escribir (“El área del Decágono es igual a: ”, (5*pow(lado,2)*sqrt(5+2*sqrt(5)))/2, “cm²”)

                        Caso O_Volver:

                                    Escribir (“Volviendo al menú principal...”)

                        Otro:

                                    Escribir (“Las opciones válidas son del 1 al 14.”)

                                    Escribir (“Vuelva a intentarlo.”)

            Fin_Según

Fin                 

Función trd

Inicio

            Escribir (“Calculadora de Figuras Geométricas Tridimensionales”)

            Escribir (“¿Con qué tipo de figuras desea trabajar?”)

            Escribir (“(1) Cubo”)

            Escribir (“(2) Piramide Triangular”)

            Escribir (“(3) Piramide Cuadrangular”)

            Escribir (“(4) Piramide Pentagonal”)

            Escribir (“(5) Piramide Hexagonal”)

            Escribir (“(6) Prisma Triangular”)

            Escribir (“(7) Prisma Cuadrangular”)

            Escribir (“(8) Prisma Pentagonal”)

            Escribir (“(9) Prisma Hexagonal”)

            Escribir (“(10) Paralelepipedo”)

            Escribir (“(11) Cono”)

            Escribir (“(12) Cilindro”)

            Escribir (“(13) Esfera”)

            Escribir (“(14) ß Volver”)

            Escribir (“Ingresa tu elección (1-14):”)

            Leer (opcion)

            Según opcion hacer

                        Caso O_Cubo:

                                    Escribir (“Ingresa el tamaño de la arista: “)

                                    Leer (arista)

                                    Mientras arista <= 0 hacer

                                               Escribir (“La arista no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (arista)

                                    Fin_Mientras

                                    Escribir (“El área lateral del cubo es igual a: ”, 4*pow(arista, 2), “cm²”)

Escribir (“El área total del cubo es igual a: ”, 6*pow(arista, 2), “cm²”)

                        Caso Piramide_Triangular:

                                    Escribir (“Ingresa el lado de la base de dicha Piramide Triangular: ”)

                                    Leer (lado_base)

                                    Mientras lado_base <= 0 hacer

                                               Escribir (“El lado de la base no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (lado_base)

                                    Fin_Mientras

                                    Escribir (“Ingresa la apotema de dicha Piramide Triangular: ”)

                                    Leer (apotema)

                                    Mientras apotema <= 0 hacer

                                               Escribir (“La apotema no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (apotema)

                                    Fin_Mientras

                                    altura_base = sqrt (3*lado_base)/2

                                    area_base = lado_base*altura_base/2

                                    pb = (lado_base*3)

                                    Escribir (“El área lateral de la Piramide Triangular es igual a: ”,

(pb*apotema)/2, “cm²”)

Escribir (“El área total de la Piramide Triangular es igual a: ”,

((pb*apotema)/2)+area_base, “cm²”)

                        Caso O_Piramide_Cuadrangular

                                    Escribir (“Ingresa el lado de la base de dicha Piramide Cuadrangular: ”)

                                    Leer (lado_base)

                                    Mientras lado_base <= 0 hacer

                                               Escribir (“El lado no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (lado_base)

                                    Fin_Mientras

                                    Escribir (“Ingresa la apotema de dicha Piramide Cuadrangular: ”)

                                    Leer (apotema)

                                    Mientras apotema <= 0 hacer

                                               Escribir (“La apotema no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (apotema)

                                    Fin_Mientras

                                    area_base = pow (lado_base, 2)

                                    pb = (lado_base*4)

                                    Escribir (“El área lateral de dicha Piramide Cuadrangular es igual a: ”,

(pb*apotema)/2, “cm²”)

Escribir (“El área total de dicha Piramide Cuadrangular es igual a: ”,

((pb*apotema)/2)+area_base, “cm²”)

                        Caso O_Piramide_Pentagonal:

                                    Escribir (“Ingresa el lado de la base de dicha Piramide Pentagonal: ”)

                                    Leer (lado_base)

                                    Mientras apotema <= 0 hacer

                                               Escribir (“La apotema no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (apotema)

                                    Fin_Mientras

                                    Escribir (“Ingresa la apotema de dicha Piramide Pentagonal: ”)

                                    Leer (apotema_base)

                                    Mientras apotema <= 0 hacer

                                               Escribir (“La apotema de la base no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                                Leer (apotema_base)

                                    Fin_Mientras

                                    altura_base = sqrt (3*lado_base)/2

                                    pb = (lado_base*5)

                                    area_base = pb*apotema_base/2

                                    Escribir (“El área lateral de dicha Piramide Pentagonal es igual a: ”,

(pb*apotema)/2, “cm²”)

Escribir (“El área total de dicha Piramide Pentagonal es igual a: ”,

((pb*apotema)/2)+area_base, “cm²”)

                        Caso O_Piramide_Hexagonal

                                    Escribir (“Ingresa el lado de la base de dicha Piramide Hexagonal: ”)

                                    Leer (lado_base)

                                    Mientras lado_base <= 0 hacer

                                               Escribir (“El lado no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (lado_base)

                                    Fin_Mientras

                                    Escribir (“Ingresa la apotema de dicha Piramide Hexagonal: ”)

                                    Leer (apotema)

                                    Mientras apotema <= 0 hacer

                                               Escribir (“La apotema no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (apotema)

                                    Fin_Mientras

                                    pb = (lado_base*6)

                                    area_base = (pb*apotema)/2

                                    Escribir (“El área lateral de dicha Piramide Hexagonal es igual a: ”,

(pb*apotema)/2, “cm²”)

Escribir (“El área total de dicha Piramide Hexagonal es igual a: ”,

((pb*apotema)/2)+area_base, “cm²”)

                        Caso O_Prisma_Triangular:

                                    Escribir (“Ingresa la altura de dicho prisma triangular: ”)

                                    Leer (altura)

                                    Mientras altura <= 0 hacer

                                               Escribir (“La altura no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (altura)

                                    Fin_Mientras

                                    Escribir (“Ingresa el lado de dicho prisma triangular: ”)

                                    Leer (lado_base)

                                    Mientras lado_base <= 0 hacer

                                               Escribir (“El lado no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (lado_base)

                                    Fin_Mientras

                                    altura_base = sqrt (3*lado_base)/2

                                    pb = (lado_base*3)

                                    area_base = (lado_base*altura)/2

                                    Escribir (“El área lateral de dicho Prisma Triangular es igual a: ”,

(pb*altura), “cm²”)

Escribir (“El área total de dicho Prisma Triangular es igual a: ”,

((pb*altura)+2*area_base), “cm²”)

                        Caso O_Prisma_Rectangular:

                                    Escribir (“Ingresa la altura de dicho Prisma Rectangular: ”)

                                    Leer (altura)

                                    Mientras altura <= 0 hacer

                                               Escribir (“La altura no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (altura)

                                    Fin_Mientras

                                    Escribir (“Ingresa el lado de dicho Prisma Rectangular: ”)

                                    Leer (lado_base)

                                    Mientras lado_base <= 0 hacer

                                               Escribir (“El lado no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (lado_base)

                                    Fin_Mientras

                                    pb = (lado_base*4)

                                    area_base = pow (lado_base, 2)

                                    Escribir (“El área lateral de dicho Prisma Rectangular es igual a: ”,

(pb*altura), “cm²”)

Escribir (“El área total de dicho Prisma Rectangular es igual a: ”,

((pb*altura)+2*area_base), “cm²”)

                        Caso O_Prisma_Pentagonal:

                                    Escribir (“Ingresa el lado de la base de dicho Prisma Pentagonal: ”)

                                    Leer (lado_base)

                                    Mientras lado_base <= 0 hacer

                                               Escribir (“El lado de la base no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (lado_base)

                                    Fin_Mientras

                                    Escribir (“Ingresa la apotema de dicho Prisma Pentagonal: ”)

                                    Leer (apotema)

                                    Mientras apotema <= 0 hacer

                                               Escribir (“La apotema no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (apotema)

                                    Fin_Mientras

                                    Escribir (“Ingresa la apotema de la base de dicho Prisma Pentagonal: ”)

                                    Leer (apotema_base)

                                    Mientras apotema_base <= 0 hacer

                                               Escribir (“La apotema de la base no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (apotema_base)

                                    Fin_Mientras

                                    altura_base = sqrt (3*lado_base)/2

                                    pb = (lado_base*5)

                                    area_base = pb*apotema_base/2

                                    Escribir (“El área lateral de dicho Prisma Pentagonal es igual a: ”,

(pb*apotema), “cm²”)

Escribir (“El área total de dicho Prisma Pentagonal es igual a: ”,

((pb*altura)+2*area_base), “cm²”)

                        Caso O_Prisma_Hexagonal:

                                    Escribir (“Ingresa el lado de la base de dicho Prisma Hexagonal: ”)

                                    Leer (lado_base)

                                    Mientras lado_base <= 0 hacer

                                               Escribir (“El lado no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (lado_base)

                                    Fin_Mientras

                                    Escribir (“Ingresa la apotema de dicho Prisma Hexagonal: ”)

                                    Leer (apotema)

                                    Mientras apotema <= 0 hacer

                                               Escribir (“La apotema no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (apotema)

                                    Fin_Mientras

                                    pb = (lado_base*6)

                                    area_base = (apotema*pb) /2

                                    Escribir (“El área lateral de dicho Prisma Hexagonal es igual a: ”,

(pb*apotema), “cm²”)

Escribir (“El área total de dicho Prisma Hexagonal es igual a: ”,

(((pb*altura)/2)+2*area_base), “cm²”)

                        Caso O_Paralelepipedo:

                                    Escribir (“Ingresa el largo de la base de dicho Paralelepipedo: ”)

                                    Leer (largo)

                                    Mientras largo <= 0 hacer

                                               Escribir (“El largo no puede ser negativo o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (largo)

                                    Fin_Mientras

                                    Escribir (“Ingresa el ancho de dicho Paralelepipedo: ”)

                                    Leer (ancho)

                                    Mientras ancho <= 0 hacer

                                               Escribir (“El ancho no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (ancho)

                                    Fin_Mientras

                                    Escribir (“Ingresa la apotema de la base de dicho Paralelepipedo: ”)

                                    Leer (altura)

                                    Mientras altura <= 0 hacer

                                               Escribir (“Lo alto de esta figura no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (altura)

                                    Fin_Mientras

                                    Escribir (“El área lateral de dicho Paralelepipedo es igual a: ”,

(2*(largo)*(ancho)+2*(largo)*(altura)), “cm²”)

Escribir (“El área total de dicho Paralelepipedo es igual a: ”,

(2*(largo)*(ancho)+2*(largo)*(altura)+2*(ancho)*(altura)), “cm²”)

                        Caso O_Cono:

                                    Escribir (“Ingresa el radio: ”)

                                    Leer (radio)

                                    Mientras radio <= 0 hacer

                                               Escribir (“El radio no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (radio)

                                    Fin_Mientras

                                    Escribir (“Ingresa la generatriz: ”)

                                    Leer (generatriz)

                                    Mientras generatriz <= 0 hacer

                                               Escribir (“La generatriz no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (generatriz)

                                    Fin_Mientras

                                    area_base = PI*pow(radio, 2) /2

                                    Escribir (“El área lateral de dicho cono es igual a: ”,

(PI*radio*generatriz), “cm²”)

Escribir (“El área total de dicho cono es igual a: ”,

((PI*radio*generatriz)+area_base), “cm²”)

                        Caso O_Cilindro:

                                    Escribir (“Ingresa el radio: ”)

                                    Leer (radio)

                                    Mientras radio <= 0 hacer

                                               Escribir (“El radio no puede ser negativo o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (radio)

                                    Fin_Mientras

                                    Escribir (“Ingresa la altura: ”)

                                    Leer (altura)

                                    Mientras altura <= 0 hacer

                                               Escribir (“La altura no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (altura)

                                    Fin_Mientras

                                    area_base = PI*pow(radio, 2)

                                    Escribir (“El área lateral del Cilindro es igual a: ”,

2*(PI*radio*altura), “cm²”)

Escribir (“El área total del Cilindro es igual a: ”,

(2*(PI*radio*altura)+2*area_base), “cm²”)

                        Caso O_Esfera:

                                    Escribir (“Ingresa el radio: ”)

                                    Leer (radio)

                                    Mientras radio <= 0 hacer

                                               Escribir (“El radio no puede ser negativa o cero.”)

                                               Escribir (“Inténtalo de nuevo…”)

                                               Leer (radio)

                                    Fin_Mientras

                                    Escribir (“El área de la Esfera es igual a: ”, 4*(PI*pow(radio, 2)),“cm²”)

                        Caso O_Volver:

                                    Escribir (“Regresando al menú principal…”)

                        Otro:

                                    Escribir (“Las opciones válidas son del 1 al 14.”)

                                    Escribir (“Vuelva a intentarlo.”)

            Fin_Segun

FIN

 

Función AboutUs

INICIO

            Escribir (“HELLO_WORLD!”)

            Escribir (“Somos el grupo 3 de la clase”)

            Escribir (“’Fundamentos de Programación’ de la UCV.”)

            Escribir (“Nuestros integrantes son: ”)

            Escribir (“Guillermo Alejandro Gonzales Valencia: ggonzaval@ucvvirtual.edu.pe”)

            Escribir (“Jhayron Joseph Quiliche Valladolid: jhquilichev@ucvvirtual.edu.pe”)

            Escribir (“Jordan Fernando Azañero Reyes: jfazaneror@ucvvirtual.edu.pe”)

            Escribir (“Jorge Andrés Vigo Alemán: jovigoa@ucvvirtual.edu.pe”)

            Escribir (“José Arturo Gutiérrez Casanova: jgutierrezcall@ucvvirtual.edu.pe”)

            Escribir (“Patrick Emanuel Medina Balladares: pemedinam@ucvvirtual.edu.pe”)

            Escribir (“Yasmin Amparo Palma Rondo: yapalmar@ucvvirtual.edu.pe”)

FIN

No hay comentarios.:

Publicar un comentario

Introducción a Nuestro Proyecto

 CALCULADORA DE FIGURAS GEOMÉTRICAS La presente investigación va destinada hacia el desarrollo de un programa que nos sirva de herramienta p...