• Author / Uploaded
• Diego Villafana

Citation preview

EXAMEN DE LENGUAJE DE PROGRAMACION INGENIERÍA MECANICA Apellidos y Nombres: ____________________________________ Fecha: 28/09/2015

Código: ___________

1. El Director de ISI Sabatino desea implementar un programa de descuento en la mensualidad de los estudiantes universitarios de acuerdo al promedio obtenido en las asignaturas que cursan, el cual consiste en lo siguiente: si el promedio obtenido por un alumno en el último período es mayor o igual que 80 se le hará un descuento del 25% sobre la(s) mensualidad y no se le cobrará IVA; si el promedio es menor que 80 deberá pagar la(s) mensualidad completa más 15% de IVA. Calcular e imprimir cuanto debe pagar un alumno. Proceso sin_titulo Escribir "Ingrese promedio" Leer prom mens=1000 iva=18 Si prom >= 80 Entonces costo = 0.75*mens Sino Costo = (mens) + (0.15*(mens*0.18)) FinSi Escribir "El alumno debe pagar: ",costo FinProceso

2. Determinar la cantidad de dinero que recibirá un trabajador por concepto de las horas extras trabajadas en una empresa, sabiendo que cuando las horas de trabajo exceden de 40, el resto se consideran horas extras y que estas se pagan al doble de una hora normal cuando no exceden de 8; si las horas extras exceden de 8 se pagan las primeras 8 al doble de lo que se pagan las horas normales y el resto al triple. Proceso horas_extras Escribir "Horas trabajadas"; Leer ht; Escribir "Pago por Hora"; Leer pph; pe=0; Si ht 1000000 Entonces pinos = 0.7 * metros; oyameles = 0.2 * metros; cedros = 0.1 * metros; Sino pinos = 0.5 * metros; oyameles = 0.3 * metros; cedros = 0.2 * metros; FinSi cantidad_pinos = trunc(pinos * 8/10); cantidad_oyameles = trunc(oyameles * 15/15); cantidad_cedros = trunc(cedros * 10/18); totalsembrado = cantidad_pinos + cantidad_oyameles + cantidad_cedros; Hectareas = num_hectareas; metros= (Hectareas * 10000); Escribir "Superficie del Terreno: ", metros " mts^2"; Escribir "Hectareas a sembrar: ", Hectareas " hectarea/s "; Escribir "Metros cuadrados de pino a sembrar: ", pinos " mts^2"; Escribir "Metros cuadrados de oyamel a sembrar: ",oyameles " mts^2"; Escribir "Metros cuadrados de cedro a sembrar: ", cedros " mts^2"; Escribir "Cantidad de pinos a sembrar: ", cantidad_pinos; Escribir "Cantidad de oyameles a sembrar: ", cantidad_oyameles; Escribir "Cantidad de cedros a sembrar: ", cantidad_cedros; Escribir "Total de Árboles sembrados: ", totalsembrado " Árboles"; FinProceso

2. Una frutería ofrece las manzanas con descuento según la siguiente tabla:

Numero de kilos comprados % Descuento 0−2 0% 2.01 − 5 10% 5.01 − 10 15% 10.01 en adelante 20% Determinar cuánto pagara una persona que compre manzanas es esa frutería. Proceso sin_titulo Definir k como real; Escribir "Numero de Kilos "; Leer k; pk = 5; si k > 0 y k 2.01 y k 5.01 y k 30

TIPO DE CLIMA Frío Nublado Calor Tropical

Proceso sin_titulo Escribir " Ingrese la temperatura" Leer temp; Definir Clima como Caracter si temp 10 & temp 21 & temp = 80 Entonces costo = 0.75*mens Sino Costo = (mens) + (0.15*(mens*0.18)) FinSi Escribir "El alumno debe pagar: ",costo FinProceso

3. Dado tres números enteros, devolver cuales el mayor Proceso mayor Escribir "Ingresar en la volor A: "; Leer a; Escribir "Ingresar en la volor B: "; Leer b; Escribir "Ingresar en la volor C: "; Leer c; Definir ma como Caracter; Si (a > b & a > c) Entonces ma = "a"; Sino Si (b > a & b > c) Entonces ma = b; Sino ma = c; FinSi FinSi Escribir "El numero mayor es: ", ma; FinProceso

EXAMEN DE LENGUAJE DE PROGRAMACION

INGENIERÍA MECANICA Apellidos y Nombres: ____________________________________ Fecha: 28/09/2015

Código: ___________

1. Determinar la cantidad de dinero que recibirá un trabajador por concepto de las horas extras trabajadas en una empresa, sabiendo que cuando las horas de trabajo exceden de 40, el resto se consideran horas extras y que estas se pagan al doble de una hora normal cuando no exceden de 8; si las horas extras exceden de 8 se pagan las primeras 8 al doble de lo que se pagan las horas normales y el resto al triple. Proceso horas_extras Escribir "Horas trabajadas"; Leer ht; Escribir "Pago por Hora"; Leer pph; pe=0; Si ht c) Entonces mayora & b >c) Entonces mayor