jueves, 6 de diciembre de 2012

Numeros del 1 al 10

PROBLEMA
Imprimir los números del 1 al 10

ALGORITMO
Entradas:  Numerico  contador

INICIO
    Imprimir “Numeros del 1 al 10”
    Para contador desde 1 hasta 10, incremento 1
            Imprimir contador
            Imprimir “-“
    Fin para
FIN

PSEUDOCODIGO
Class   Numeros
            // Declaraciones
            Entero: contador
            // Procedimiento
            Main
                 Print “Numeros del 1 al 10”
                 For (contador = 1; contador = 10;contador = contador +1)
                        Print contador
                        Print “-“
                 End_for
            End_ main

Colores

PROBLEMA
Escribir una algoritmo que le permita aun usuario elegir entre tres colores diferentes y se termine cuando el numero de veces que se haya elegido el primer color sea 5.

ALGORITMO
Entradas: Alfanumerico color
                Numerico contador

INICIO
   Mientras contador sea menor a 5 hacer
       Leer color
           Si color es
                "amarillo" entonces
                        Imprimir "Eligio amarillo"
                        Sumar contador mas uno  y guardar en contador
                "rojo" entonces
                        Imprimir "Eligio rojo"
                "azul" entonces
                        Imprimir "Eligio azul"
           si no
                 Imprimir "Opcion invalida"
           Fin selector
     Fin mientras
FIN

PSEUDOCODIGO
Class Colores
          // Declaraciones
          Cadena: color
          Entero: contador
          // Procedimiento
          Main
               While (contador <5) as
                    Print "Escribe un color"
                    Scan color
                        Switch (color)
                              "amarillo":
                                     Print "Eligio amarillo"
                                     contador = contador +1
                              "rojo":
                                     Print "Eligio rojo"
                              "azul":
                                     Print "Eligio azul"
                          End_switch
                   End_while
             End_main

Area de un triangulo

PROBLEMA
Escriba un algoritmo que lea la base y la altura de un triangulo mientras que el area resultante sea mayor a 1.

ALGORITMO
Entradas:  Numerico base
                 Numerico altura
Salidas:    Numerico area

INICIO
   Hacer
        Leer base
        Leer altura
        Multiplicar base por altura y guardar en area
        Dividir area entre 2 y guardar en area
        Imprimir area
    Mientras area sea mayor a 1
FIN

PSEUDOCODIGO
Class  Triangulo
           // Declaraciones
           Real: base
           Real: altura
           Real: area
           // Procedimiento
           Main
              Do
                 Print "Introduce la base"
                 Scan base
                 Print "Introduce la altura"
                 Scan altura
                 area = base * altura
                 area = area / 2
                 Print area
             While (area>1

Area de un rectangulo

PROBLEMA
Escribir un algoritmo que calcule el area de un rectangulo de a cuerdo a su base  y su altura y se repita hasta que ambos datos ean 0

ALGORITMO
Entradas: Numerico base
                Numerico altura
Salidas:   Numerico area

INICIO
     Hacer
          Leer base
          Leer altura
          Multiplicar  base por altura y guardar en area
     Mientras base sea mayor a 0 y altura sea mayor a 0
FIN

PSEUDOCODIGO
Class  Area_rectangulo
         // Declaraciones
         Real: base
         Real: altura
         Real: area
         // Procedimiento
         Main
              Do
                  Print "Introduce la base"
                  Scan base
                  Print "Introduce la altura"
                  Scan altura
                  area = baso * altura
             While (base >0 AND altura > 0)
        End_main

Tocayo

PROBLEMA
Escribir un algoritmo que lea el nombre de una persona y pregunte a otras personas su nombre hasta encontrar a su tocayo.

ALGORITMO
Entradas: Alfanumerico nombre
                Alfanumerico otro_nombre

INICIO
   Leer nombre
   Mientras que otro_nombre sea diferente a nombre hacer
         Leer otro_nombre
   Fin mientras
   Imprimir "Ya lo encontro"
FIN

PSEUDOCODIGO
Class Tocayo
          // Declaraciones
          Cadena: nombre
          Cadena: otro_nombre
          // Procedimiento
          Main
               Print "Introduce tu nombre"
               Scan nombre
               While (otro_nombre != nombre) as
                    Print "Introduce tu nombre"
                    Scan otro_nombre
               End_while
               Print "Ya lo encontro"
          End_main

Palabra secreta

PROBLEMA
Necesitamos un algoritmo que lea palabras hasta encontrar la palabra secreta "vampiro"

ALGORITMO
Entradas: Alfanumerico palabra

INICIO
   Mientras  palabra sea diferente de "vampiro" hacer
         Imprimir "Introduce una palabra"
         Leer palabra
   Fin mientras
   Imprimir "Ya la encontro"
FIN

PSEUDOCODIGO
Class Palabra_secreta
         // Declaraciones
         Cadena: palabra
         // Procedimiento
         Main
             While (palabra != "vampiro")
                  Print "Introduce una palabra"
                  Scan palabra
              End_while
              Print "Ya la encontro"
         End_main

Suma de numeros

PROBLEMA
Suponga que necesitamos  un algoritmo que lea numeros hasta que la suma de esos numeros sea mayor a 10.

ALGORITMO
Entradas:  Numerico  numero
Salidas:     Numerico  suma

INICIO
   Mientras suma sea menor o igual a 10 hacer
        Imprimir "Introduce un numero"
        Leer numero
        Sumar suma mas numero y guardar en suma
   Fin mientras
FIN

PSEUDOCODIGO

Class Suma_de_numeros
          // Declaraciones
          Entero: numero
          Entero: suma
          // Procedimiento
          Main
                While (suma<=10)
                     Print "Introduce un numero"
                     Scan numero
                     suma = suma + numero
                End_while
          End_main

   

Figuras

PROBLEMA
Escribir un qalgoritmo que le permita a 10 personan elegir entre 3 posibles figuras (triangulo, circulo o cuadrado), una vez que elija la figura preguntar que operacion desea realizar, si calcular area o perimetro y pedir los datos necesarios para la operacion. Imprimir mensajes con la figura elegida, la operacion realizada y el resultado de dicha operacion.

ALGORITMO
Entradas:
Numérico: personas
Numérico: opción
Numérico: operación
Numérico: PI=3.1416
Numérico: base
Numérico: altura

INICIO
    Para personas desde 1 hasta 10 incremento de 1
       Imprimir “elige una figura”
       Leer opción
             Si (opción)
                 1: figura= triangulo
                 2: figura= circulo
                 3: figura= cuadrado
                 Default= figura no disponible
              Fin selector
        Imprimir: “elige una operación”
             Leer  operación
                 Si (operación)
                      1: operación= área
                      2: operación= perímetro
                      Default= operación no disponible
                 Fin selector
                       Si triangulo es “si” entonces
                            Imprimir “elige una operación”
                                Si operación es “área” entonces
                                    Multiplicar base por altura y guardar en área
                                    Dividir área entre dos
                                    Imprimir área
                                Si operación es “perímetro” entonces
                                     Multiplicar base por 3 y guardar en perímetro
                                     Imprimir perímetro
                        Si figura es “circulo” entonces
                             Imprimir “elige una operación”
                                Si operación es “área” entonces
                                     Multiplicar PI por radio^2 y guardar en área
                                     Dividir área entre dos
                                     Imprimir área
                                Si no
                                     Multiplicar radio por dos y guardar en perímetro
                                     Multiplicar perímetro por dos y guardar
                                     Imprimir perímetro
                         Si figura es “cuadrado” entonces
                              Imprimir “elige operación”
                                 Si operación es área entonces
                                      Multiplicar base por altura y guardar en área 
                                 Si no
                                      Multiplicar base por 4 y guardar en perímetro
                                      Imprimir perímetro
                                      Imprimir figura elegida
                                      Imprimir resultado
                                      Imprimir operación
FIN

PSEUDOCODIGO

Class FiguraDisponible
//declaraciones
entero: personas
entero: opción
entero: operación
real: PI=3.1416
real: base
real: altura
//procedimiento
main
    for (personas= 1, personas=10+1)
       print “elige una figura”
      scan opción
      Switch (opción)
         1: figura= triangulo
         2: figura= circulo
         3: figura= cuadrado
         Default= figura no disponible
      End_switch
      print: “elige una operación”
      scan  operación
      Switch (operación)
          1: operación= área
          2: operación= perímetro
          Default= operación no disponible
       End_switch
       if (triangulo = “si”) then
          print “elige una operación”
              if (operación = “área”) then
                  area=base*altura
                  area=area/2
                  print área
              if (operación= “perímetro”) then
                  perimetro=base*3
                  print perímetro
       if (figura = “circulo”) then
          print “elige una operación”
                  if (operación = “área”) then
                  area= (PI) *(radio^2)
                 area=area/2
                  print área
         else
                  perimetro=radio*2
                  perimetro=perimetro*2
                  print perímetro
         if (figura = “cuadrado”) then
                  print “elige operación”
                       if (operación = área) then
                      area=base*altura
         else
                       perímetro=base*4
                       print perímetro
print figura elegida
print resultado
print operación
End_main

Edades

PROBLEMA
Escribir un algirtmo que le pregunte a una persona su edad y cuantos hijos tiene e imprima un mensaje que diga cuantos años tiene mas que cad auno de sus hijos.

ALGORITMO
Entradas:  Numerico hijos
                Numerico numero_hijos
                Numerico edad_persona
                Numerico edad_hijo
Salidas:     Numerico anios_mas

INICIO
   Imprimir "¿Cual es su edad?"
   Leer edad_persona
   Imprimir "¿Cuantos hijos tiene?"
   Leer numero_hijos
        Para hijos desde 1 hasta numero_hijos, incremento 1
              Imprimir "¿Cual es la edad de su hijo?"
              Leer edad_hijo
              Restar edad_persona menos edad_hijo y guardar en anios_mas
              Imprimir "Los años que tiene de mas son"
              Imprimir anios_mas
         Fin para
FIN

PSEUDOCODIGO
Class Edades
         //Declaraciones
         Entero: hijos
         Entero: numero_hijos
         Entero: edad_persona
         Entero: edad_hijo
         Entero: anios_mas
         //Procedimiento
         Main
              Print "¿Cual es su edad?"
              Scan edad_persona
              Print "¿Cuantos hijos tiene?"
              Scan numero_hijos
                    For (hijos = 1; hijos <= numero_hijos; hijos = hijos +1)
                          Print "¿Cual es la edad de tu hijo?"
                          Scan edad_hijo
                          anios_mas = edad_persona - edad_hijos
                          Print "Los años que tiene de mas son"
                          Print  anios_mas
                   End_for
         End_main

Calificacion deun alumno

PROBLEMA
Escribir un algoritmo que le pregunte la calificacion numerica a un alumno (0-10) e imprimir un mensaje de alumno aprobado a todos aquellos que tengan calificacion mayor a 6 e imprimir un mensaje para saber de los 28 alumnos cuantos aprobaron  y cuantos no.

ALGORITMO
Entradas:  Numerico alumnos
                Numerico calificacion
Salidas     Numerico aprobados
                Numerico reprobados

INICIO
  Imprimir "Calificaciones"
      Para alumnos desde 1 hasta 28, incremento 1
          Imprimir "Introduce tu calificacion"
          Leer calificacion
             Si calificacion es >= 6 entonces
                 Imprimir "APROBADO"
                 Sumar aprobados mas 1 y guardar en aprobados
             Si no
                 Imprimir "REPROBADO"
                 Sumar reprobados mas 1 y guardar en reprobados
             Fin si
        Fin para
        Imprimir "Alumnos aprobados "
        Imprimir aprobados
        Imprimir "Alumnos rerpobados"
        Imprimir reprobados
FIN

PSEUDOCODIGO
Class Calificaciones
         // Declaraciones
         Entero: alumnos
         Real: calificacion
         Entero: aprobado
         Entero: reprobado
         // Procedimiento
         Main
              Print "Calificaciones"
                 For (alumnos = 1; alumnos <= 28; alumnos = alumnos +1)
                       Print "Introduce tu calificacion"
                       Scan calificacion
                             If (calificacion >= 6) then
                                  Print "APROBADO"
                                  aprobados = aprobados +1
                             Else
                                  Print "REPROBADOS"
                                  reprobados = reprobados +1
                             End_if
                  End_for
                  Print "Alumnos aprobados"
                  Print aprobados
                  Print "Alumnos reprobados"
                  Print reprobados
           En_main
   

Numero impares

PROBLEMA
Escribir un algoritmo que imprim la lista de numeros impares del 5 al 15 n orden inverso e imprimir la suma total de esos numeros.

ALGORITMO
Entradas:  Numerico numeros
Salidas:     Numerico suma_numeros

INICIO
   Imprimir "Numeros impares el 5 al 15"
         Para numeros desde 15 hast 5, incremento menos 2
               Imprimir numeros
               Imprimir "-"
               Sumar suma_numeros mas numeros y guardar en suma_numeros
          Fin para
          Imprimir " La suma de los numeros impares es:"
          Imprimir suma_numeros
 FIN

PSEUDOCODIGO
Class Numeros_impares
         // Declaraciones
         Entero: numeros
         Entero: suma_numeros
         // Procedimiento
         Main
              Print "Numero impares del 5 al 15"
                    For (numeros = 15; numeros >=5; numeros = numeros -2)
                         Print numeros
                         Print "-"
                         suma_numeros = suma_numeros + numeros
                    End_for
                    Print "La suma de los numeros impares es:"
                    Print suma_numeros
           End_main

miércoles, 5 de diciembre de 2012

Numero pares

PROBLEMA
Crear un algoritmo que imprima los numero pares del 10 al 20

ALGORITMO
Entradas:  Numerico  numeros

INICIO
Imprimir "Numero pares del 10 al 20"
   Para numeros desde 10 hasta 20, incremento 2
          Imprimir numeros
          Imprimir "-"
   Fin para
FIN

PSEUDOCODIGO
Class Numeros_pares
         // Declaraciones
         Entero: numeros
         // Procedimiento
         Main
             Print "Numero pares del 10 al 20"
                  For (numeros = 10; numeros <= 20; numeros = numeros +2)
                        Print numeros
                        Print "-"
                  End_for
         End_main

Autos

PROBLEMA
Necesitamos un algoritmo que le permita a los alumnos escogen una opcion del 1 al 4 para un modelo de auto (Chevy, Tsuru, Bora y Polo) y nos imprima un mensaje con el total de alumnos que eligieron cada auto.

ALGORITMO
Entradas:  Numerico auto
                Numerico alumnos
Salidas:    Numerico total_chevy
                Numerico total_ tsuru
                Numerico total_bora
                Numerico total_polo

INICIO
    Para alumnos desde 1 hasta 28, incremento 1
       Imprimir "Elige un auto"
       Leer auto
           Si auto es
                1  entonces
                    sumar total chevy mas 1 y guardar en total_chevy
                2  entonces
                    sumar total_tsuru mas 1 y guardar en total_tsuru
                3  entonces
                    sumar total_bora mas 1 y guardar en total_bora
                4  entonces
                    sumar total_polo mas 1 y guardar en total_polo
            Si no
                    Print "Numero invalido"
            Fin selector
    Fin para
    Print "El total de autos chevy es:"
    Print total_chevy
    Print "El total de autos Tsuru es:"
    Print total_tsuru
    Print "El total de autos bora es:"
    Print total_bora
    Print "El total de autos polo es:"
    Print total_polo
FIN

PSEUDOCODIGO
Class  Autos
         //Declaraciones
         Entero: auto
         Entero: alumnos
         Entero: total_chevy
         Entero: total_tsuru
         Entero: total_bora
         Entero: total_polo
         // Procedimiento
         Main
               For (alumnos = 1; alumnos <= 28; alumnos = alumnos +1)
                    Print "Elige un auto"
                    Scan auto
                         Switch (auto)
                              1: total_chevy = total_chevy +1
                              2: total_tsuru = total_tsuru +1
                              3: total_bora = total_bora +1
                              4: total_polo = total_polo +1
                              Default: Print "Numero invalido"
                          End_switch
               End_for
               Print " El total de autos chevy es:"
               Print total_chevy
               Print "El total de autos Tsuru es:"
               Print total_ tsuru
               Print "El total de autos bora es:
               Print total_bora
               Pirnt "El total de autos polo es:"
               Print total_polo
         End_main
                    

Jugador

PROBLEMA
Necesitamos un algoritmo que nos diga el total de puntos de un jugador de bola 8 o mande un mensaje de "Fin del juego" cuando meta la bola 8.

ALGORITMO
Entradas:  Alfanumerico  nombre_jugador
                Numerico  numero_bolas
                Numerico  bola
Salidas:    Numerico  puntos

INICIO
Imprimir "Introduce tu nombre"
Leer nombre_jugador
   Para numero_bolas desde 1 hasta 15, incremento1
        Imprimir "¿Cual bola metió?"
        Leer bola
            Si bola es igual a 8 entonces
                Imprimir "Fin del juego"
            Si no
                Sumar puntas mas bola y guaradr en puntos
            Fin si
   Fin para
   Imprimir puntos
FIN

PSEUDOCODIGO
Class  Juego
          // Declaraciones
          Cadena: nombre_jugador
          Entero: numero_bolas
          Entero: bola
          Entero: puntos
          // Procedimiento
          Main
              Print "Introduce tu nombre"
              Scan nombre_jugador
                    For (numero_bolas = 1; numero_bolas <= 15; numero_bolas = numero_bolas + 1)
                          Print "¿Cual bola metio?"
                          Scan bola
                                If  (bola = 8) then
                                    Print "Fin del juego"
                                Else
                                    puntos = puntos + bola
                                End_if
                    End_for
                    Print puntos
            End_main

Colores

PROBLEMAS
Necesitamos un algoritmo que pregunte a cada alumno su color favorito y nos diga a cuantos les gusta el color morado.

ALGORITMO
Entradas:  Numerico  alumnos
                Alfanumerico  color_favorito
Salidas:    Numerico  total_morado

INICIO
   Para alumnos desde 1 hasta 28, incremento 1
       Imprimir "¿Cual es tu color favorito?"
       Leer color_favorito
            Si color_favorito es "morado" entonces
                sumar total_morado mas 1 y guardar en total_morado
            Fin si
   Fin para
   Imprimir total_morado
FIN

PSEUDOCODIGO
Class  Colores
          // Declaraciones
          Entero: alumnos
          Cadena: color_favorito
          Entero: total_morado
          // Procedimiento
          Main
                For (alumnos = 1; alumnos <= 28; alumnos = alumnos +1)
                      Print "¿Cual es tu color favorito?"
                      Scan color_favorito
                          If (color_favorito = morado) then
                               total_morado = total_morado + 1
                          End_if
                end_for
                Print total_morado
          End_main
 

Mascotas

PROBLEMA
Necesitamos un algoritmo que nos permita saber cuantan mascotas tienen conjuntamente los alumnos del grupo.

ALGORITMO
Entradas:   Numerico alumnos
                 Numerico mascotas_alumnos
Salidas:      Numerico total_mascotas

INICIO
   Para alumnos desde 1 hasta 28, incremento 1
        Imprimir "¿Cuantas mascotas tienes?
        Leer mascotas_alumnos
        Sumas total_mascotas mas mascotas_alumno y guardar en total_mascotas
   Fin para
   Imprimir total_mascotas
FIN

PSEUDOCODIGO
Class Mascotas
        // Declaraciones
        Entero: alumnos
        Entero: mascotas_alumnos
        Entero: total_mascotas
        // Procedimiento
        Main
             For (alumnos = 1; alumnos<=28; alumnos = alumnos +1)
                 Print "¿Cuantas mascotas tienes?"
                 Scan mascotas_alumnos
                 total_mascotas = total_mascotas + mascotas_alumnos
              End_for
              Print total_mascotas
         End_main

UTTEC

PROBLEMA
Un alumno de la UTTEC quiere obtener el promedio de las calificacions de sus 8 materias.

ALGORITMO

Entradas:  Numerico  numero_materias
                  Numerico  calificación
                  Alfanumerico  nombre
Salidas:     Numerico  promedio

INICIO
   Imprimir  “Introduce tu nombre”
   Leer nombre
       Para numero_materias desde 1 hasta 8, incremento 1
            Imprimir numero_materias
           Imprimir “Introduce tu calificación”
           Leer calificación
           Sumar promedio  mas calificación y guardar en promedio
       Fin para      
       Dividir promedio entre 8 y guardar en promedio
       Imprimir nombre
       Imprimir “obtuvo”
       Imprimir promedio
FIN

PSUDOCODIGO
Class Uttec
        // Declaraciones
        Entero: numero_materias
        Real: calificacion
        Cadena: nombre
        Real: promedio
        // Procedimiento
        Main
            Print "Introduce tu nombre"
            Scan nombre
                For (numero_materias = 1; numero_materias <=8; numero_materias = numero_materias +1)
                     Print numero_materias
                     Print "Introduce tu calificacion"
                     Scan calificacion
                     promedio = promedio + calificacion
                End_ for
                promedio = promedio / 8
                Print nombre
                Print "obtuvo"
                Print promedio
           End_main

Numeros del 1 al 10

PROBLEMA
Imprimir los números del 1 al 10

ALGORITMO
Entradas:  Numerico  contador

INICIO
    Imprimir “Numeros del 1 al 10”
    Para contador desde 1 hasta 10, incremento 1
            Imprimir contador
            Imprimir “-“
    Fin para
FIN

PSEUDOCODIGO
Class   Numeros
            // Declaraciones
            Entero: contador
            // Procedimiento
            Main
                 Print “Numeros del 1 al 10”
                 For (contador = 1; contador = 10;contador = contador +1)
                        Print contador
                        Print “-“
                 End_for
            End_ main

lunes, 3 de diciembre de 2012

Tres Figuras

PROBLEMA
Necesitamos un programa que le permita al usuario seleccionar entre 3 figuras: circulo, triangulo o cuadrado. Si selecciona circulo, pedirle el radio y calcular el area; si elige cuadro pedirle un lado y calcular el perimetro; si la figura es triangulo entonces preguntar si es equilatero: si sí es equilatero, pedir un lado, y si no, pedir los tres lados y calcular el perimetro.
Imprimir un mensaje con la figura seleccionada y el resultado de la operacion.

ALGORITMO

Entradas:  Alfanumerico    figura
                Numerico         radio
                Numerico         lado_cuad
                Numerico         lado_tri
                Numerico         lado_1
                Numerico         lado_2
                Numerico         lado_3
                Alfanumerico    tipo_triangulo
Salidas:    Numerico          resultado

INICIO
Establecer PI= 3.1416
Imprimir "Elija una figura"
Leer figura
    Si figura es
        "circulo" entonces
             Leer radio
             Multiplicar PI por radio al cuadrado y guardar en resultado
             Imprimir "Eligio un circulo"
             Imprimir "Su area es"
             Imprimir resultado
        "cuadrado" entonces
             Leer lado_cuad
             Multiplicar lado_cuad por 4 y guardar en resultado
             Imprimir "Eligio un cuadrado"
             Imprimir "Su perimetro es"
             Imprimir resultado
        "triangulo" entonces
             Imprimir "Que tipo de triangulo es"
             Leer tipo_triangulo
                  Si tipo_triangulo es "EQUILATERO" entonces
                       Leer lado_tri
                       Multiplicar lado_tri por 3 y guardar en resultado
                   Si no
                       Leer lado_1
                       Leer lado_2
                       Leer lado_3
                       Sumar lado_1 mas lado_2 mas lado_3 y guardar en resultado
                   Imprimir " Elegio un triangulo "
                   Imprimir "su perimetro es"
                   Imprimir resultado
    Si no entonces
    Imprimir "Figura no disponible"
    Fin_selector
FIN

PSEUDOCODIGO
Class  Figuras
          // Declaraciones
          Real : PI= 3.1416
          Cadena: figura
          Real : radio
          Real: lado_cuad
          Real: lado_tri
          Real: lado_1
          Real: lado_2
          Real: lado_3
          Cadena: tipo_triangulo
          Real: resultado
          // Pricedimiento
          Main
               Print "Elija una figura"
               Scan figura
               Switch (figura)
                   "circulo":
                       Print "introduce el radio"
                       Scan radio
                       resultado = 3.1416 * (radio^2)
                       Print "Eligio un circulo"
                       Print "su area es"
                       Print resultado
                   "cuadrado":
                       Print "Introduce el valor de uno de los lados"  
                       Scan lado_cuad
                       resultado = lado_cuad * 4
                       Print "Elijio un cuadrado"
                       Print "su perimetro es"
                       Print  resultado
                   "triangulo":
                       Print "¿Que tipo de triangulo es?
                       Scan tipo_triangulo
                              If tipo_triangulo = "EQUILATERO" then
                                  Print "Introduce el valor de uno de los lados"
                                  Scan lado_tri
                                  resultado = lado_tri * 3
                              Else
                                  Print "Introduce el valor de los tres lados"
                                  Scan lado_1, lado_2, lado_3
                                  resultado = lado_1 + lado_2 + lado_3
                              Print " Eligio un triangulo"
                              Print "Su perimetro es"
                              Print resultado
                              End_if
                   Default: Print "Figura no disponible"