Practica 7

ESTRUCTURAS ALGORÍTMICAS SELECTIVAS

Objetivo: practicar la resolución de problemas que incluyen el uso de estructuras de control
selectivas utilizando diagramas de flujo en la herramienta PSeInt.

Comentario(Auto evaluación de lo aprendido): La estructuras selectivas se basan en numero, constantes o variables, operaciones lógicas, estas pueden tomar un valor el cual seria Verdadero o Falso.

Estos operadores se usan para comparar valores de dos expresiones pero deben ser del mismo tipo. Para esto podemos usar las "tablas de verdad" donde dos se evalúan dos expresiones y se comprueban si son las dos verdaderas o falsas. Por ejemplo, si las dos son verdaderas el conjunto es verdadero, y si una es falsa o las dos, entonces es falso.

Son tres estructuras:

-Estructura selectiva simple (Si entonces): permite que el flujo del diagrama siga un mismo camino especifico si se cumple una condición o un conjunto de ellas.

-Estructura selectiva doble(Si entonces/Sino): permite que el flujo de diagrama se bifurque por dos ramas diferentes en el punto de la toma de decisión.

-Estructura selectiva doble(Si múltiple): permite que el flujo de diagrama se bifurque en varias ramas, dependiendo la decisión que tome el que usa el programa.

2. La cotangente de un ángulo se define como el cociente entre el coseno y el seno de dicho ángulo.

cot (∝) = cos (∝)/sen(∝)

Construya un diagrama de flujo que le permita calcular la cotangente de un ángulo, considerando que se conoce el valor del seno y del coseno del mismo. Recuerde que el seno debe ser diferente de 0.

Proceso en PSeint.
Proceso cot
Escribir "Ingrese el angulo"
Leer ang
angr <- (ang*pi)/180
Si sen(angr) <> 0 Entonces
cot <- Cos(angr)/sen(angr)
Escribir "Cotangente" Cot
Sino
Escribir "El Coseno del angulo no puede ser 0"
    FinSi

FinProceso

Resultado.














Diagrama.
Para tamaño completo clic en la imagen.
















4. Dado como dato el sueldo de un trabajador, considere un aumento del 15% si su sueldo es inferior a $1,000 y de un 12% en caso contrario. Imprima el sueldo con el aumento incorporado. Haga el diagrama de flujo correspondiente.

Proceso en PSeint.
Proceso Sueldo
Escribir "Su sueldo:"
Leer Sueldo
Si Sueldo<1000 Entonces
SueldoNuevo <- Sueldo*1.15
Sino
SueldoNuevo <- Sueldo*1.12
FinSi
Escribir "Su nuevo sueldo sera: ",SueldoNuevo

FinProceso

Resultado.














Diagrama.
Para tamaño completo clic en la imagen.
















6. Haga un diagrama de flujo para calcular el precio del billete ida y vuelta en ferrocarril, conociendo la distancia del viaje de ida y el tiempo de estancia. Se sabe además que si el número de días de estancia es superior a 7 y la distancia total (ida y vuelta) a recorrer es superior a 800 km, el billete tiene una reducción del 30%. El precio por Km es de $0.23.

Proceso en PSeint.
Proceso Ticket
Escribir 'Distancia de Ida'
Leer IDA
Escribir 'Distancia de Vuelta'
Leer VUE
Escribir 'Dìas de estancia'
Leer DIA
IDAVUE<-IDA+VUE
IDAVUEB <- (IDAVUE*0.23)
Si IDAVUE>800 Y DIA>7 Entonces
DESCUENTO <- IDAVUEB*0.30
TOTAL <- IDAVUEB-DESCUENTO
Sino
TOTAL = IDAVUEB
FinSi
Escribir "Total a pagar sera: $",TOTAL

FinProceso

Resultado.
















Diagrama.
Para tamaño completo clic en la imagen.
























8. Construya un diagrama de flujo que pueda determinar, dado dos números enteros, si un número es divisor de otro.

Proceso en PSeint.
Proceso NUMer
Escribir "Ingrese numero 1:"
Leer A
Escribir "Ingrese numero 2:"
Leer B
Si B mod A=0 Entonces
Escribir A " es divisor de " B
Sino
Si (A mod B=0) Entonces
Escribir B " es divisor de " A
Sino
Escribir "No hay numero divisores"
FinSi
FinSi

FinProceso

Resultado.














Diagrama.
Para tamaño completo clic en la imagen.
















10. Construya un diagrama de flujo tal que dado como datos A, B y N, compruebe la igualdad de la siguiente expresión:

(A/B)^N = A^N/B^N

Proceso en PSeint.
Proceso ABN
Escribir "En este proseco usaremos A,B y N para comprobar la igualdad de las expresiones"
Escribir "Ingrese A"
Leer A
Escribir "Ingrese B"
Leer B
Escribir "Ingrese N"
Leer N
Si (A/B)^N = A^N/B^N Entonces
Escribir "Las expresiones son iguales"
Sino
Escribir "Las expresiones no son iguales"
FinSi

FinProceso

Resultado.















Diagrama.
Para tamaño completo clic en la imagen.


















12. Construya un diagrama de flujo tal que dado como dato una temperatura en grados Fahrenheit, determine el deporte que es apropiado practicar a esa temperatura, teniendo en cuenta la siguiente tabla:


Proceso en PSeint.
Proceso DEPORTES
Escribir 'Ingrese la temperatura en grados Fahrenheit'
Leer F
Si F > 85 Entonces
Escribir " Haga Natación."
FinSi
Si F > 70 Y F <= 85 Entonces
Escribir "Juege Tenis."
FinSi
Si F > 32 Y F <= 70 Entonces
Escribir "juege Golf."
FinSi
Si F > 10 Y F <= 32 Entonces
Escribir "Haga Esquí"
FinSi
Si F <= 10 Entonces
Escribir "Haga Marcha."
FinSi
FinProceso

Resultado.
Diagrama.
Para tamaño completo clic en la imagen.


14. Haga un diagrama de flujo que permita calcular el valor de f(x), según la expresión:
Proceso en PSeint.
Proceso FX
Escribir "En este programa se mostrara el resultado de f(x)= segun su numero."
Escribir "ingrese su numero:"
Leer x
Si (x MOD 4) = 0 Entonces
Resultado = x^2
Escribir "La funcion f(",x,")=",x,"^2"
FinSi
Si (x MOD 4) = 1 Entonces
Resultado = x/6
Escribir "La funcion f(",x,")=",x,"/6"
FinSi
Si (x MOD 4) = 2 Entonces
Resultado = RAiZ(x)
Escribir "La funcion f(",x,")=Raiz de ",x,""
FinSi
Si (X MOD 4) = 3 Entonces
Resultado = (x^3)+5
Escribir "La funcion f(",x,")=(",x,"^3)+5"
FinSi
Escribir "El resultado es: ", Resultado
FinProceso

Resultado.
Diagrama.
Para tamaño completo clic en la imagen.


16. Construya un diagrama de flujo tal que dado como datos el modelo de un vehículo y su precio, determine el valor final que debe pagar el comprador. El concesionario está haciendo descuentos teniendo en cuenta el modelo, con base en la siguiente tabla.

Proceso en PSeint.
Proceso Carros
Escribir "Se calculara el descuento dependiendo el automóvil, y el precio del mismo"
Escribir "Ingrese el precio del automóvil"
Leer p
Escribir ""
Escribir "A continuación se daran los modelos, escoga el suyo según el numero:"
Escribir "Modelo 1 = Blazer-Trail"
Escribir "Modelo 2 = Cavalier"
Escribir "Modelo 3 = Chevy"
Escribir "Modelo 4 = Opel-Astra"
Leer op
Escribir ""
Segun op Hacer
1:
Escribir "Escogió Blazer-Trail, con descuento de 8%"
Escribir "El precio a pagar con descuento es = ", (p * 0.92)
2:
Escribir "Escogió Cavalier, con descuento de 5%"
Escribir "El precio a pagar con descuento es  = ", (p * 0.95)
3:
Escribir "Escogió Chevy con descuento de 6%"
Escribir "El precio a pagar con descuento es  = ", (p * 0.94)
4:
Escribir "Escogió Opel-Astra con descuento de 9%"
Escribir "El precio a pagar con descuento es  = ", (p * 0.91)
FinSegun
Escribir "¡Gracias por su compra!"
FinProceso

Resultado.
Diagrama.
Para tamaño completo clic en la imagen.






18. Construya un diagrama de flujo que le permita calcular e imprimir el costo de una llamada telefónica. Para calcular el costo final se sigue lo indicado en la siguiente tabla:

Proceso en PSeint.
Proceso Llamada
Escribir "Esto le ayudara a calcular cuanto costo su llamada."
Escribir "ingrese el tiempo que tardo su llamada."
Leer T
Escribir ""
Escribir "¿A qué zona fue la llamada?(Escoga la zona por el numero)."
Escribir "1 = América del Norte"
Escribir "2 = América Central"
Escribir "3 = América del Sur"
Escribir "4 = Europa"
Escribir "5 = Asia"
Escribir "6 = África"
Escribir "7 = Oceanía"
Leer Z
Segun Z Hacer
1:
Si T <= 3 Entonces
precio <- (T * 2)
Sino
precio <- (T * 1.5)
FinSi
2:
Si T <= 3 Entonces
precio <- (T * 2.2)
Sino
precio <- (T * 1.8)
FinSi
3:
Si T <= 3 Entonces
precio <- (T * 4.5)
Sino
precio <- (T * 3.5)
FinSi
4:
Si T <= 3 Entonces
precio <- (T * 3.5)
Sino
precio <- (T* 2.7)
FinSi
5: 
Si T <= 3 Entonces
precio <- (T * 6)
Sino
precio <- (T * 4.6)
FinSi
6: 
Si T <= 3 Entonces
precio <- (T * 6)
Sino
precio <- (T * 4.6)
FinSi
7: 
Si T <= 3 Entonces
precio <- (T * 5)
Sino
precio <- (T * 3.9)
FinSi
FinSegun
Costo = precio/100
Escribir ""
Escribir "El costo de su llamada es de: $", Costo
FinProceso


Resultado.


Diagrama.
Para tamaño completo clic en la imagen.













20. Escriba un diagrama de flujo que permita realizar la conversión de pesos y medidas. Considere las siguientes equivalencias:

Medidas de longitud:
1 pulgada equivale a 25.4 milímetros
1 yarda equivale a 0.9144 metro
1 milla equivale a 1.6093 kilómetro
1 pulgada2 equivale a 6.452 centímetros^2
1 pie2 equivale a 0.09290 metro^2
1 yarda2 equivale a 0.8361 metro^2
1 acre equivale a 2.59 kilómetros^2

Medidas de volumen:
1 pie3 equivale a 0.02832 metro^3
1 yarda3 equivale a 0.7646 metro^3
1 pinta equivale a 0.56826 litro
1 galón equivale a 4.54609 litros

Medidas de peso:
1 onza equivale a 28.35 gramos
1 libra equivale a 0.45359 kilogramo
1 ton inglesa equivale a 1.0160 tonelada

Utilizar tres variables: una para la opción (medida de longitud, volumen o peso), otra 
para la sub opción y una última para la medida a convertir.

Proceso en PSeint.
Proceso CONVERSOR
Escribir "Este es el conversor de pesos y medidas."
Escribir "Seleccione que unidad desea convertir(Escoga un numero):"
Escribir "1 = Longitud"
Escribir "2 = Volumen"
Escribir "3 = Peso"
Leer op1
Escribir ""
Segun op1 Hacer
1:
Escribir "Seleccione que desea convertir(Seleccione un numero):"
Escribir "1 = Pulgadas a milímetros"
Escribir "2 = Yardas a metros"
Escribir "3 = Millas a kilómetros"
Escribir "4 = Pulgadas^2 a centímetros"
Escribir "5 = Pies^2 a  metros^2"
Escribir "6 = Yardas^2 a metros^2"
Escribir "7 = Acres a kilómetros^2"
Leer op2
Escribir "Ingrese medida que desea convertir:"
Leer med
Escribir ""
Segun op2 Hacer
1:
Escribir med, " Pulgadas = ", med*25.4, " milímetros."
2:
Escribir med, " Yardas = ", med*0.9144, " metros."
3:
Escribir med, " Millas = ", med*1.6093, " kilómetros"
4:
Escribir med, " Pulgadas = ", med *6.452, " centímetros."
5:
Escribir med, " Pies^2 = ", med*0.09290, " metros^2."
6:
Escribir med, " Yardas^2 = ", med* 0.8361, "metros^2"
7:
Escribir med, " Acres = ", med*2.59 " kilómetros^2"
FinSegun
2:
Escribir "Seleccione que desea convertir(Seleccione un numero):"
Escribir "1 = Pie^3 a metros^3"
Escribir "2 = Yarda^3 a metros^3"
Escribir "3 = Pintas a litros"
Escribir "4 = Galones a litro"
Leer op2
Escribir "Ingrese medida que desea convertir:"
Leer med
Segun op2 Hacer
1:
Escribir med, " Pie^3 = ", med*0.02832, " metros^3."
2:
Escribir med, " Yardas^3 = ", med*0.7646, " metros^3."
3:
Escribir med, " Pintas = ", med*0.56826, " litros"
4:
Escribir med, " Galones = ", med *4.54609, " litros."
FinSegun
3:
Escribir "Seleccione que desea convertir(Seleccione un numero):"
Escribir "1 = Onzas a gramo"
Escribir "2 = Libras a kilogramos"
Escribir "3 = Ton Inglesas a toneladas"
Leer op2
Escribir "Ingrese medida que desea convertir:"
Leer med
Segun op2 Hacer
1:
Escribir med, " Onzas = ", med*28.35, " gramos."
2:
Escribir med, " Libras = ", med*0.45359, " kilogramos."
3:
Escribir med, " Ton Inglesas = ", med*1.0160, " toneladas"
FinSegun
FinSegun
FinProceso

Resultado.














Diagrama.
Para tamaño completo clic en la imagen.



No hay comentarios:

Publicar un comentario