Menús Pseint

 Trabajamos en los programas menú 


Algoritmo Menu_2

               

 

                ESCRIBIR "MENU OPCIONES"

                ESCRIBIR "1 . Área y perímetro de un triángulo";

                ESCRIBIR "2 . Área y perímetro de un cuadrado";

                ESCRIBIR "3 . Conversor de dinero";

                ESCRIBIR "4 . SALIR";

 

                Leer OP

               

                Según OP hacer

                               1:

                                               Escribir "Calcular área y perímetro triangulo"

                                               Definir Base, Altura, Área como entero

                                              

                                               Escribir "BASE"

                                               Leer Base

                                               Escribir "Altura"

                                               Leer Altura

                                              

                                               Área<- (Base * Altura)/2

                                              

                                               Escribir "Área del triángulo”, Área

                                              

                                               Definir Perímetro, A, B, C Como Real

                                              

                                               Escribir "Los tres lados medidos del triángulo"

                                               Leer A, B , C

                                              

                                               Perímetro = A+B+C

                                              

                                               ESCRIBIR "el Perímetro del triángulo es " , Perímetro

                                              

                               2:

                                               Escribir "Calcular área y perímetro de un cuadrado"

                                               Definir Área, Perímetro , Lado Como Real          

                                              

                                               Escribir "Medida del lado"

                                               Leer Lado

                                               Área= lado * lado

                                               Escribir "El área del cuadrado es" , área

                                              

                                               Escribir "Digite la medida de un lado del cuadrado"

                                               Leer Lado

                                               Perímetro = Lado * 4

                                              

                                               Escribir "El perímetro del cuadrado es " , perímetro

                                              

                                              

                               3:

                              

                                                              

                                                               Definir peso colombiano , dólar, conversión Como Real

                                                              

                                                              

                                                               Escribir "Ingrese monto de dolares"

                                                               Leer monto

                                                              

                                                               peso_colombiano <- 3777.25

                                                              

                                                               peso_colombiano = peso_colombiano * monto

                                                               Escribir "PESO COLOMBIANO" peso_colombiano

                                                              

                                                              

                                                               Definir dolar_canadiense  como real

                                                              

                                                               dolar_canadiense<- 1.23

                                                              

                                                               dolar_canadiense = dolar_canadiense * monto

                                                              

                                                              Escribir "DOLAR CANADIENSE" dolar_canadiense

                                                              

                                                               Definir libra_esterlina como real

                                                              

                                                               libra_esterlina<- 0.73

                                                              

                                                               libra_esterlina = libra_esterlina * monto

                                                              

                                                               Escribir "LIBRA ESTERLINA"  libra_esterlina

                                                              

                                                               Definir euro Como Real

                                                              

                                                               Euro<- 0.84

                                                              

                                                               Euro= euro * monto

                                                              

                                                               Escribir "EUROS"  euro

                                              

                                                              

                FinSegun




Comentarios