TALLER PROGRAMACIÓN 6
CICLO MIENTRAS CUALITATIVO
GRUPO 2
INTEGRANTES: GARCÍA TORRES MELANIE BRIYITH PERALTA MOTERROZA EILYN YAZMIN PULIDO MARTINEZ ELENAR
PROFESOR ROBERTO MAL
PROGRAMA INGENIERIA AMBIENTAL Y SANITARIA FACULTAD DE INGENIERIA
UNIVERSIDAD DEL MAGDALENA 2015-II
1. Una Ferretería vende dos tipos de Cables, Cable Tipo A ($200 por MT) y Cable Tipo B ($300 por MT ); realice un algoritmo que teniendo como datos por cada cliente su nombre, tipo de cable a comprar y cantidad de metros requeridos, calcule y de cómo salida el nombre y el neto a pagar por cada cliente, tomando en cuenta que no se conoce la cantidad de ellos y que la empresa da una rebaja del 10% por cada compra que exceda de los 100 MT de cable de cualquier tipo funcion_principal entero neto, cantidad, bandera; cadena nombre; caracter cable, opcion; bandera=1; mientras (bandera==1) hacer imprimir (" Ingrese su nombre " ); leer (nombre); imprimir (" Ingrese la cantidad de mts de cable "); leer (cantidad); imprimir (" Ingrese el tipo de cable A: si es de tipo a o B: si es tipo b \n" ); leer (cable); si (cable=='A' || cable=='a' && cantidad<=100) entonces neto=200*cantidad; imprimir (" El neto a pagar por " , nombre, " es " , neto ); si_no si (cable=='A' || cable=='a' && cantidad>100) entonces neto=(200*cantidad)-((200*cantidad)*10)/100; imprimir (" El neto a pagar por " , nombre, " es \n" , neto ); si_no si (cable=='B' || cable=='b' && cantidad<=100) entonces neto=300*cantidad; imprimir (" El neto a pagar por " , nombre, " es \n" , neto );
si_no si (cable=='B' || cable=='b' && cantidad>100) entonces neto=(300*cantidad)-((300*cantidad)*10)/100; imprimir (" El neto a pagar por " ,nombre, " es \n" ,neto ); fin_si fin_si fin_si fin_si imprimir ( " Si desea ingresar otro comprador ingrese S sino N \n" ); leer (opcion); si (opcion=='S' || opcion=='s')entonces bandera=1; si_no si (opcion=='N' || opcion=='n')entonces bandera=0; fin_si fin_si fin_mientras fin_principal
2. Diseñe un algoritmo usando seudocódigo que calcule el costo de envió de un paquete según el siguiente cuadro. No se conoce el número de paquetes, el usuario decide cuanto terminar. Tipo de paquete Carta Caja
Prioridad A 120pesos/gramo 4575pesos/kilo
Prioridad B 101pesos/gramo 3550pesos/kilo
Prioridad C 85pesos/gramo 1775pesos/kilo
funcion_principal caracter tipoe, prioridad, opción; entero peso, band, precio; band=1; mientras ( band==1) hacer imprimir (" Ingrese su tipo de envío: C para caja o S para carta "); leer (tipoe); imprimir ( "Ingrese el peso de su envio " ); leer (peso); imprimir ( "Ingrese la prioridad de su envío (A, B, C) "); leer (prioridad); si( tipoe == 'S' || tipoe == 's' && prioridad == 'A' ||prioridad == 'a' ) entonces precio= peso* 120; imprimir (" El valor de su envio es ", precio); si_no si ( tipoe == 'S' || tipoe == 's' && prioridad == 'B' || prioridad == 'b') entonces precio= peso* 101; imprimir (" El valor de su envio es ", precio); si_no si ( tipoe == 'S' || tipoe == 's' && prioridad == 'C' || prioridad == 'c') entonces precio= peso* 85; imprimir (" El valor de su envio es ", precio); si_no si ( tipoe == 'C' || tipoe == 'c' && prioridad == 'A' || prioridad == 'a') entonces precio= peso* 4575; imprimir (" El valor de su envio es ", precio); si_no
si ( tipoe == 'C' || tipoe == 'c' && prioridad == 'B' || prioridad == 'b') entonces precio= peso* 3550; imprimir ("El valor de su envio es", precio); si_no si ( tipoe == 'C' || tipoe == 'c' && prioridad == 'C' || prioridad == 'c') entonces precio= peso* 1775; imprimir (" El valor de su envio es", precio); fin_si fin_si fin_si fin_si fin_si fin_si imprimir( " Desea continuar S/N "); leer (opción); si ( opcion == 'S' || opcion == 's') entonces band=1; si_no si ( opcion == 'N' || opcion == 'n') entonces band=0; fin_si fin_si fin_mientras fin_principal
3. Diseñe un algoritmo que reciba como parámetros la estatura y la edad de un conjunto de personas de las cuales no se conoce su cantidad. El algoritmo debe determinar cuentas personas son de estatura baja(Menos de 1.40), estatura
media(1.40 hasta 1.60) y Alta (Mayores que 1.60). El algoritmo termina cuando le usuario ingrese una estatura negativa. Se debe determinar además cuantas personas son de estatura alta y tienen mas de 60 años, cuantas son de estatura media y tienen 50 años y cuántos son bajos y son menores de edad. funcion_principal real est; entero edad, c1,c2,c3,ca,cm,cb; imprimir (" Ingrese su estatura "); leer (est); mientras (est>0)hacer imprimir (" Ingrese su edad "); leer (edad); si (est<1.40) entonces imprimir (" Usted es de estura baja "); cb=cb+1; si_no si (est>=1.40&&est<=1.60)entonces imprimir (" Usted es de estatura media "); cm=cm+1; si_no si (est>1.60)entonces imprimir (" Usted es de estatura alta "); ca=ca+1; fin_si
fin_si fin_si
si(est>=1.40&&est<=1.60&&edad==50)entonces c2=c2+1; si_no si(est>1.60&&edad>60)entonces c3=c3+1; si_no si(est<1.40&&edad<18)entonces c1=c1+1; fin_si fin_si fin_si
imprimir ( "\nIngrese otra estatura, para salir ingrese una estatura negativa"); leer (est); fin_mientras imprimir ("\nLas personas con estatura baja y menores de edad son", c1 ); imprimir ("\nLas personas con estatura media y edad 50 son ", c2 ); imprimir ("\nLas personas con estatura alta y edad mas de 60 años son", c3 );
fin_principal