67318989-2-Algoritmos-If

22
“Año de la Consolidación Económica y Social del Perú”

Transcript of 67318989-2-Algoritmos-If

Page 1: 67318989-2-Algoritmos-If

“Año de la Consolidación Económica y Social del Perú”

Page 2: 67318989-2-Algoritmos-If

1. Elaborar un algoritmo para calcular e imprimir el precio de un terreno del cual se tienen los siguientes datos: largo, ancho y precio por metro cuadrado. Si el terreno tiene más de 400 metros cuadrados se hace un descuento de 10%.

Algoritmos COSTO DE TERRENO

Declaraciones

VariablesAnch, Long, CostMetro, CostTot, Área:

RealSolicitar anchura, longitud, costo metroLeer Anch, Long, CostMetroCalcular Área = Anch*Long IF Área < 400 THEN

CostTot = Área*CostMetroELSE CostTot = Área*CostMetro*0.9ENDIFImprimir CostTotFin

2. Igual al ejercicio anterior, sólo que si el terreno tiene más de 500 metros cuadrados el descuento es de 17% y si tiene más de 1000 el descuento es de 25%.

Algoritmos COSTO DE TERRENO 2Declaraciones

VariablesAnch, Long, CostMetro, CostTot, Área:

RealSolicitar anchura, longitud, costo metro Leer Anch, Long, CostMetroCalcular Área = Anch*Long IF Área < 500 THEN

CostTot = Área*CostMetroELSE

IF Área < 1000 THENCostTot = Área*CostMetro*0.83ELSE

CostTot = Área*CostMetro*0.75ENDIF

ENDIF

Page 3: 67318989-2-Algoritmos-If

Imprimir CostTotFin

3. Elaborar un algoritmo para calcular e imprimir los valores de X y Y, teniendo como entrada el valor de X y calculando el de Y de acuerdo con las siguientes condiciones.

Si X < 0 entonces Y = 3x+6

Si X > = 0 entonces Y = x ^ 2 +6

Algoritmos CÁLCULO DE YDeclaraciones

VariablesX, Y: Real

Solicitar YLeer YIF X < 0 THEN

Y = 3*X +6ELSE Y = X^2+6ENDIF Imprimir X, YFin

4. Elabore un algoritmo que imprima el costo de un pedido de un artículo del cual se tiene la descripción, la cantidad pedida y el precio unitario. Si la cantidad pedida excede de 50 unidades, se hace un descuento de 15%

Algoritmo COSTO PEDIDODeclaraciones

VariablesCostTot, Descrip, Cant, PrecioUni: Real

Solicitar descripción, la cantidad pedida y el precio unitario

Leer Descrip, Cant, PrecioUniIF Cant < 50 THEN

CostTot = Cant*PrecioUniELSE CostTot = Cant*PrecioUni *0.85ENDIF Imprimir CostTotFin

Page 4: 67318989-2-Algoritmos-If

5. Un cliente ordena cierta cantidad de hojas de hielo seco, biguetas y armazones; las hojas de hielo seco tienen el 20% de descuento y las biguetas 15%. Los datos que se tienen por cada tipo de artículo son: la cantidad pedida y el precio unitario. Además, si se paga de contado todo tiene un descuento de 7%. Elaborar un algoritmo que calcule e imprima el costo total del orden, tanto para el pago de contado como para el caso de pago de crédito.

Algoritmos COSTO VARIOS ARTICULOSDeclaraciones

VariablesHieloSeco, Biguetas, Armazones, HieloSecoOfert,

ViguetasOfert, Total, CantH CantB, CantA, SubT: Real

TipPag (crédito o al contado) Solicitar Precios de: hielo seco, viguetas y

armazonesCantidad de: hielo seco, viguetas y

armazonesLeer HieloSeco, Viguetas, Armazones Calcular HieloSecoOfert = HieloSeco*0.8

ViguetasOfert = Viguetas*0.75SubT =HieloSecoOfert*CantH + BiguetasOfert*CantB +

Armazones* CantA

IF TipPag=créditoTHENTotal = SubT

ELSE Total = SubT*0.93ENDIF Imprimir TotalFin

Page 5: 67318989-2-Algoritmos-If

6. Igual que el ejercicio 4.7.13 anterior, pero además: Si la cantidad de hojas de hielo seco solicitada es mayor que 50, se hace un descuento adicional de 5%; en caso de ser mayor que 100 el descuento adicional es de 10%.

Algoritmos CLIENTE HOJAS SECO

Declaraciones Variables

Nombre-clie: Cadena (30)

Tipo-clie, cantidad: Entero

PrecioUnit, subtotal, descuento. Total-pagar: Real

Solicitar Nombre, tipo de cliente, cantidad > 50 y 100, Precio Leer Nombre, tipo de cliente, cantidad > 50 y 100, precio

Calcular

Subtotal = Cantidad * PrecioUnitCase tipo cli

1: Descuento = Subtotal * 0.052: Descuento = Subtotal * 0.10

ENDCASE

Total Pagar = Subtotal – Descuento Imprimir Nombre clie, Subtotal, Descuento, total a

pagar

Fin

7. Elaborar un algoritmo que lea los datos de un estudiante: Nombre y tres calificaciones parciales e imprimir el Nombre y la calificación final de acuerdo a lo siguiente: Para aprobar el curso, debe tener 70 o más en cada de las tres calificaciones, la calificación final será el promedio. En caso de haber reprobado uno o más exámenes ordinarios, la calificación final será NA (NO ACREDITADO).

Page 6: 67318989-2-Algoritmos-If

Algoritmos CALIFICACIONES PARCIALES

Declaraciones

Variables NmbreEst: Cadena (30)

Calificaciones Parciales = Entero

Calif1, Calif2, Calif3, Calif final: Real

Solicitar Nombre del estudiante, calificaciones 1, 2, 3 Leer Nombre del estudiante. Calif1, cal if2, calif3 Calcular Calif –Final = (Calif1 + Calif2 + calif3)/ 3

IF CaliFin > = 70 THEN a. Observación = “Aprobado”

ELSE b. Observación = “Reprobado”

ENDIF Imprimir Nombre del estudiante, calificación final,

observación

Fin 8. De acuerdo a la clase de sus ángulos los triángulos se

clasifican en : Rectángulo tiene un ángulo recto (igual 90º)

Obtusángulo tiene un ángulo obtuso (mayor que 90º pero menor que 180ª)

Acutángulo los tres ángulos son agudos (menor que 90ª)

Elaborar un algoritmo que permita leer el tamaño de los tres ángulos (A, B, C) de un triángulo e imprima de qué tipo es.

Page 7: 67318989-2-Algoritmos-If

Algoritmos TIPO TRIANGULO

Declaraciones

Variables

AnguloA, AnguloB, AnguloC: Real Solicitar AnguloA, AnguloB, AnguloC Leer AnguloA, AnguloB, AnguloC

Calcular IF AnguloA = AnguloB THEN

a. Imprimir “Los ángulos iguales”b. IF Angulo A < 90 THEN

1: Imprimir “Son agudos”c.ENDIF

d. IF Angulo A = 90 THEN1: Imprimir “Son Rectos”

e. ENDIF f. IF (Angulo A >90) AND (Angulo < 180) THEN1: Imprimir “Son obtusos

g . ENDIF h. IF Angulo A = 180 THEN1: Imprimir “Son llanos

i . ENDIF j. IF (Angulo A > 180) AND (Angulo A < 1360) THEN1: Imprimir “Son cóncavos”

k . ENDIF

ELSEa. Imprimir “LOS ANGULOS SON DIFERENTES”b. IF AnguloA < 90 THEN 1. Imprimir “EL ANGULO A ES AGUDO”

c. ENDIF d. IF ANGULO A = 90 THEN

1. Imprimir “EL ANGULO A ES RECTO”e. ENDIF f. IF (ANGULOA > 90) AND (ANGULOA < 180) THEN

1. Imprimir “EL ANGULO ES OBTUSO”g. ENDIF h. IF Angulo = 180 THEN

1. Imprimir “El ANGULO A ES LLANO”i. IF (AnguloA > 180) AND (AnguloA< 360) THEN

1. Imprimir “EL ANGULO A ES CONCAVO “k. ENDIF l. IF AnguloC < 90 THEN

Page 8: 67318989-2-Algoritmos-If

1. Imprimir “EL ANGULO C ES AGUDO”

m. ENDIFn. IF AnguloC = 90 THEN

1. Imprimir “El ANGULO C ES RECTO”o. ENDIF p. IF (AnguloC > 90) AND (AnguloC < 180) THEN

1. Imprimir “EL ANGULO C ES OBTUSO”q. ENDIF r. IF AnguloC = 180 THEN

1. Imprimir “EL ANGULO C ES LLANO”

s. ENDIFt. IF (AnguloC > 180) AND ( Angulo < 360) THEN

1. Imprimir “EL ANGULO C ES CONCAVO”

u. ENDIF

ENDIF

FIN

9. En un almacén de venta de trajes si se compra uno se hace el 50% de descuento, si compra 2 el 55%, si compra 3 el 60% y si compra más de 3 el 65%.

Elaborar un algoritmo que lea la cantidad de trajes y el precio unitario (todos tiene el mismo precio) e imprima el subtotal a pagar, el descuento y el total a pagar.

Algoritmos COSTO DE ARTÍCULO

Declaraciones

Variables

Canti-Trajes, descuento, subtotal, total de pago

Aprecio U Solicitar Avanti-Trajes, descuento, PrecioU Leer Avanti-Trajes, PecrioU, Descuento Calcular Subtotal = Cantidad * Precio

Case Canti-Trajes 1. Descuento = Subtotal * 0.502. Descuento = Subtotal * 0.553. Descuento = Subtotal * 0.60

Page 9: 67318989-2-Algoritmos-If

ELSE + Descuento = Subtotal * 0.65

ENDCASE

Calcular Total-pago = Subtotal – Descuento Imprimir Subtotal. Total pago, Descuento

Fin 10. Dos triángulos son congruentes si tienen la misma forma y

tamaño, es decir, sus ángulos y lados correspondientes son iguales. Elaborar un algoritmo que lea los tres ángulos y lados de dos triángulos e imprima si son congruentes.

Algoritmos CÍRCULO, AREA Y RADIO

Declaraciones

Variables

Ángulos, Lados iguales: Real Solicitar Ángulos, Lados Leer Ángulos, Lados Calcular IF Angulo, Lado A = B

a. Imprimir son congruentes

ENDIF

Fin

11. Un trapecio es isósceles si sus dos ángulos de la base son iguales. Elaborar un algoritmo que lea los ángulos A y B de la base y que imprima si el trapecio es isósceles o no.

Algoritmo TRAPECIO ISÓSCELESDeclaraciones

VariablesA, B= Real

Solicitar A, BLeer A, BIF A=B THEN

Imprimir “ES TRAPECIO ISÓSCELES”ELSE Imprimir “NO ES TRAPECIO ISÓSCELES”

ENDIF Fin

Page 10: 67318989-2-Algoritmos-If

12. Elaborar un algoritmo que permita leer los datos de un

empleado: Nombre, tipo de empleado, número de horas trabajadas y cuota que se le paga por hora; calcular e imprimir el Sueldo a pagar. Si el empleado es tipo 1 se les pagan las horas extras (más de 40 horas) a 1.5 de la cuota por hora, si es tipo 2 a 2, si es tipo 3 a 2.5 y si mes tipo 4 a 3 veces la cuota por hora.

Algoritmos CALCULAR VALORES EN F

Declaraciones:Variables:

Nombre, Tipo-empl, Número-HorTrab, CuotaHor Solicitar Nombre, Tipo-empl, Número-HorTrab, CuotaHor Leer Nombre, Tipo-empl, Número-HorTrab, CuotaHor IF Hor-Trab > 40 THEN CASE Tipo-empl

Tipo 1 = (Número-HorTrab * CuotaHor) + (1.5 * CuotaHor)

Tipo 2 = (Número-HorTrab * CuotaHor) + (2 * CuotaHor)

Tipo 3 = (Número-HorTrab * CuotaHor) + (2.5 * CuotaHor)

Tipo 4 = (Número-HorTrab * CuotaHor) + (3 * CuotaHor)

ENDCASE Calcular Sueldo a pagar = (Número-HorTrab* Cuotahor) Imprimir Sueldo a pagar

Fin

Page 11: 67318989-2-Algoritmos-If

13. Se tiene un terreno A cuadrado que mide LADO metros por lado a un precio COSTOA por metro cuadrado, y se tiene un terreno B rectangular que mide BASE metros y ALTURA metros de altura a un COSTOB por metro cuadrado. Elaborar un algoritmo que lea los datos de los dos terrenos e imprima cuál es el más barato o si cuestan igual.

Algoritmo COSTO DE TERRENODeclaraciones

VariablesAnch, Long, CostoA, CostoB, TotC, TotD:

RealSolicitar Lado del cuadrado, costo A; ancho,

longitud, costo BLeer LadoA, CostoA, Anch, Long, CostoBCalcular TotR = Anch*Long*CostoB

TotC = LadoA^2 *CostoAIF TotR = TotCImprimir “CUESTAN IGUALES”ELSE

IF TotR < TotC THENImprimir “EL TERRENO RECTANGULAR

CUESTA MENOS”ELSEImprimir “EL TERRENO CUADRADO

CUESTA MENOS”ENDIF Fin

14. Elaborar un algoritmo que lea el número de mes entre 1y 12 y, que imprima el nombre del mes correspondiente: si es 1 “Enero”, si e 2 “Febrero”,…. etc.

Algoritmo CALCULAR MESDeclaraciones

VariablesNumMes: Entero

Page 12: 67318989-2-Algoritmos-If

Solicitar Número de MesLeer NumMesCASE 1: Imprimir “ENERO”

2: Imprimir “FEBRERO”3: Imprimir “MARZO”4: Imprimir “ABRIL”5: Imprimir “MAYO”6: Imprimir “JUNIO”7: Imprimir “JULIO”8: Imprimir “AGOSTO”9: Imprimir “SEPTIEMBRE”10: Imprimir “OCTUBRE”11: Imprimir “NOVIEMBRE”12: Imprimir “DICIEMBRE”

ENDCASE Fin

15. En el hotel Guamúchil se hace un descuento del 10% si el cliente se hospeda más de 5 días, del 15% si se hospeda más de 10 días y del 20% si se hospeda más de 15 días. Elaborar un algoritmo que lea el número de días y el precio diario de la habitación e imprima el subtotal a pagar, el descuento y el total a pagar.

Algoritmos Hotel Guamúchil, Número –días, descuento, total-pagar

Declaraciones:

Variables

Descuento, Precio, Subtotal-pagar, Total-pagar, Número-días

Solicitar Descuento, PrecioHabi, Subtotal-pagar, Total-pagar, Número-días

Leer Descuento, PrecioHabi, Subtotal-pagar, Total-pagar, Número-días

Calcular Subtotal = Número de días * PrecioHabi

Page 13: 67318989-2-Algoritmos-If

Totalpagar = Subtotal – Descuento

CASE

Si es > 5 días = Subtotal – 0.10 Si es > 10 días = Subtotal – 0.15 Si es > 15 días = Subtotal – 0.20

ENDCASE Imprimir Subtotal, Descuento, Totalpago

Fin

16. Elaborar un algoritmo que permita hacer conversiones de temperaturas entre grados Fahrenheit, Celsius, Kelvin y Ranking. Primero debe preguntar qué tipo de grados quiere convertir. Por ejemplo; si se le indica que se desea convertir una temperatura en grados Fahrenheit, debe leer la cantidad de grados ,y luego calcular e imprimir su equivalente en grados Celsius, Kelvin y Ranking, y así, debe hacer lo mismo para cada uno de los otros tipos. Para convertir a Celsius la temperatura Fahrenheit se le resta 32 y se multiplica por 5/9. Para convertir a Kelvin, se le suma 273 a los grados Celsius. Para convertir a Ranking a los grados Fahrenheit se le suma 460.

Algoritmos CÁLCULO LOGARÍTMICO DE ÁNGULO 1

Declaraciones

Variables¿Fahrenheit, Celsius, Kelvin y Ranking?

Resp: Carácter

Imprimir ¿QUE DESEA CONVERTIR?Fahrenheit (F), Celsius ©, Kelvin (K) y Ranking ®

Leer Resp

IF Resp = F THENa. Solicitar NUMEROS DE FAHRENHEIT b. Leer Fahrenheitc. Celsius = (Fahrenheit – 32) * (5/9)

Page 14: 67318989-2-Algoritmos-If

d. Kelvin = Celsius + 233e. Ranking = Fahrenheit + 460f. Imprimir Celsius “FAHRENHEIT EQUIVALEN A “g. Imprimir Fahrenheit “Celsius”

h. Imprimir Kelvin “Kelvin”

i. Imprimir Ranking “Ranking”

ENDIF

IF Resp = C THENa. Solicitar NÚMERO DE CELSIUSb. Leer CELSIUSc. CELSIUS = d.e.f.g.h.i.

Solicitar ángulo Leer ángulo Calcular Ángulo radianes = (ángulo *3,1416)/180

Seno = ½*℮^α - ℮^ (-α)

Coseno = ½*℮^α + ℮^ (-α)

Tangente = Seno/coseno

Secante = 1/coseno

Imprimir seno, coseno, tangente, secante

Fin

17. Elaborar un algoritmo que permita leer el tamaño de un ángulo en (debe preguntar en qué lo va a leer); e imprima el seno hiperbólico, coseno hiperbólico y

Page 15: 67318989-2-Algoritmos-If

tangente hiperbólica. Si lo lee en grados, debe hacer la conversión a radianes. En el ejercicio 3.6.9 está cómo hacer los cálculos.

Algoritmo CÁLCULO LOGARÍTMICO DE ÁNGULO 2

DeclaracionesConstantes

PI= 3.145926536Variables

AnguloG, AnguloR, Senhip, Coship, Tanhip: Real

Resp:CaracterImprimir ¨¿Qué desea convertir?¨

¨¿ radianes® o en grados(G)?¨Leer RespIF Resp=R

Leer Angulo RSolicitar Tamaño deln angulo en radianesCalcular SenHip=(1/2)*((Exp(AnguloR)-(-AnguloR))

CosHip=(1/2)*((Exp(AnguloR)+Exp(-AnguloR)TanHip=SenHip/CosHipImprimir SenHip, CosHip, TanHipENDIFIF Resp=G

Leer Angulo GCalcular AnguloR =AnguloG*(180/PI) Solicitar Tamaño deln angulo en radianesCalcular SenHip=(1/2)*((Exp(AnguloR)-(-AnguloR))

CosHip=(1/2)*((Exp(AnguloR)+Exp(-AnguloR)TanHip=SenHip/CosHipImprimir SenHip, CosHip, TanHipENDIFFIN

18. Elaborar un algoritmo que permita leer los datos de un aspirante a ingresar a la carrera de ingeniería industrial y de sistemas de la Universidad de Sonora: Nombre del aspirante, promedio de bachillerato y tipo

Page 16: 67318989-2-Algoritmos-If

de bachillerato (1-Físico matemático, 2-etc.…5); y que imprima si tiene un promedio mayor a 90, o bien, si tiene un promedio entre 80 y 90 y trae un bachillerato Físico matemático. En caso de no ser así imprimir rechazado.

Algoritmo ASPIRANTE A LA UNIVERSIDADDeclaraciones

Variables NombAspir:Cadena(30)PromediBachiderato,

TipoBachiderato: EnteroSolicitar Nombre Aspirante, Promedio de

BachideratoLeer NombAspir, PromediBachideratoCASE TipoBachiderato

1: Físico matemático2:…………..3:……………

ENDCASEIF PromediBachiderato> 90

Imprimir ¨ACEPTADO´´ ELSE

IF 90 > PromediBachiderato > 80 AND TipoBachiderato=1 THENImprimir ¨ACEPTADO´´

ELSEImprimir ¨RECHAZADO´´

ENDIF Imprimir Fin

19. Elaborar un algoritmo que permita leer los datos de un automóvil: marca, origen y costo; imprimir el impuesto a pagar y el precio de venta incluido el impuesto. Si el origen es Alemania el impuesto es 20%, si es de Japón el impuesto es 30%, si es de Italia el 15% y si es USA el 8%.

Algoritmo CALCULAR PRECIO DE VENTA

DECLARACIONES

Variables, Marca

Page 17: 67318989-2-Algoritmos-If

Origen (Alemania [1], Japón [2], Italia [3], USA [4])

Costo

SOLICITAR Origen, Costo

LEER Origen, Costo

CASE precio total

1. Impuesto = costo de auto * 0.20

2. Impuesto = costo de auto * 0.30

3 Impuesto = costo de auto * 0.15

4 Impuesto = costo de auto * 0.08

ENDCASE

Total a pagar = costo de auto + impuesto

IMPRIMIR Impuesto, Total a pagar

FIN

20. Un sistema de ecuaciones lineales

ax+ by = c

dx + ey = f

Se puede resolver con las fórmulas

X = ce – bf / ae- bd y = af – cd / ae – bd si (ae – bd) < > 0

Elaborar un algoritmo que lea los coeficientes a, b, c, c y f, y que calcule e imprima los valores de X y Y. Si (ae – bd) < > 0; debe calcular e imprimir los valores de X y Y, en caso contrario debe imprimir un mensaje que indique que no tiene solución.

Page 18: 67318989-2-Algoritmos-If

Algoritmo CALCULAR X y Y

DECLARACIONES

VariablesValor de A, Valor de B, Valor de C, Valor de D, Valor de E, Valor de F: Real

SOLICITAR Valor de A, Valor de B, Valor de C, Valor de D, Valor de E, Valor de F.

LEER Valor de A, Valor de B, Valor de C, Valor de D, Valor de E, Valor de F.

IF valor X Y = (ae- bd) = 0 THENIMPRIMIR “NO TIENE SOLUCIÓN”ENDIFSOLICITAR A, B, C, D, E, FLEER A, B, C, D, E, FCALCULAR

X= (ce – bf)/ (ae – bd)Y = (af – cd)/ (ae – bd)

IMPRIMIR X, YFIN

21 Elaborar un algoritmo que permita leer el Nombre, tipo de empleado y Sueldo de un empleado; que imprima el incremento de Sueldo y su nuevo sueldo de acuerdo a lo siguiente: si es tipo de empleado 1 se le aumentará el 5%, si es tipo 2 se le aumentará el 7%, si es 4 el 12%, y si es 5 el 15%.

Algoritmo SUELDO DEL EMPLEADO

DeclaracionesVariablesNombre: Cadena (30)Tipo-empl, Sueldo Emp., Incremento, nuevo sueldo

Page 19: 67318989-2-Algoritmos-If

Solicitar Nombre, tipo-empl, incremento de sueldo, nuevo-empl

Leer Nombre, Tipo-empl, incremento, Sueldo- empl

Calcular nuevo-sueldo = Sueldo + Incremento CASE Tipo- emplEmpleado1 = Sueldo + (0.05 * sueldo)Empleado2 = Sueldo + (0.07* sueldo)Empleado3 = Sueldo + (0.09 * sueldo) Empleado4 = Sueldo + (0.12 * sueldo)Empleado5 = Sueldo + (0.15 * sueldo)ENDCASEImprimir Incremento, sueldo, nuevo sueldoFin

22 Elaborar un algoritmo que permita leer una letra e imprima si es vocal o si es consonante.

ALGORITMO

DeclaracionesVariablesVocal: a, e, i, o, uSolicitar a, e, i, o, u Leer a, e, i, o, uIF la letra es a THENImprimir VOCALENDIFIF la letra es e THENImprimir VOCALENDIFIF la letra es i THENImprimir VOCALENDIF IF la letra es o THEN Imprimir VOCALENDIFIF la letra es u THEN Imprimir VOCAL ENDIFELSE imprimir consonanteENDIF FIN

Page 20: 67318989-2-Algoritmos-If

23 Elaborar un algoritmo que permita leer el tamaño de un ángulo en radianes o en grados y que imprima la tangente, secante, cotangente y cosecante. Debe preguntar en qué tiene el tamaño del ángulo y dependiendo de si es en grados o radianes, los cálculos deben hacerse de una u otra forma según corresponda.

ALGORITMO

DeclaracionesConstante: PI= 3.145926536Variables : Angulo, tangang, secang, ctgang,

cosecangAngRadianes, AngGrados : RealResp: CaráterImprimir ¿en qué tiene el tamaño del ángulo?¿Grados (G), Radianes ®?Leer RespSolicitar AnguloLeer Angulo CalcularIF Resp = G THEN

a. AngRadianes = Angulo * (pi/180)b. Imprimir “EQUIVALEN A”, AngRadianes,

“RADIANES”c. TangAng = Tang (AngRadianes)d. SecAng = Sec(AngRadianes)e. CtgAng = Ctg (AngRadianes)f. CosecAng = Cosec (AngRadianes)

ELSEa.AngGrados = Angulo * (180/pi)

b. Imprimir “EQUIVALEN”, AngGrados, “GRADOS”

c. TangAng = Tang (Angulo)d.SecAng = Sec (Angulo) e. CtgAng = Ctg ( Angulo)f. CosecAng = (Angulo)

ENDIFImprimir Tangente, Secante, Cotangente,

CosecanteFIN

24 Elaborar un algoritmo que permita leer 4 números e imprima el mayor. Debe validar que sean diferentes, es decir, si hay números iguales debe enviar un mensaje de error.´

25 ee

Page 21: 67318989-2-Algoritmos-If

ALGORITMOS NÚMERO MAYOR

DeclaracionesVariables A, B, C, D : Entero Solicitar A, B, C, D

Leer A, B, C, D IF (A>B) AND (A>C) AND (A>D) THENImprimir AELSE IF (B>C) AND (B>D) THEN Imprimir B

ELSE IF C>D THENImprimir C

ELSEImprimir D ENDIFENDIFENDIF

IF (A=B) OR (A=C) OR (A=D) THENENDIFFIN

26 Una temperatura en grados centígrados © se puede convertir a su equivalente Fahrenheit (F) con la fórmula

F = C + 32 De Fahrenheit a Centígrados con la fórmula

C = (F – 32)

Elabora un algoritmo que pregunte qué quiere convertir, si quiere convertir Centígrados; que lea la temperatura en grados Centígrados y calcule e imprima la temperatura Fahrenheit equivalente. Si quiere convertir Fahrenheit debe hacer lo propio.

ALGORITMO

DeclaracionesVariables

Page 22: 67318989-2-Algoritmos-If

Temperatura, Centígrados, Fahrenheit:REAL

Imprimir ¿A qué quiere convertir?Solicitar Temperatura, centígrados,

FahrenheitLeer Temperatura, centígrados,

FahrenheitIF Resp = Centígrados THEN

Calcular

F = C + 32

ELSE

C = (F – 32) Fahrenheit

Imprimir Centígrados-Fahrenheit, Fahrenheit – Centígrados

FIN Fin