Lab14 Estructuras Condicionales CAMBIADO
Lab14 Estructuras Condicionales CAMBIADO
Lab14 Estructuras Condicionales CAMBIADO
LABORATORIO N14
Estructuras condicionales
Alumno(s): Nota:
Grupo: Ciclo:
Requiere No
Criterio de Excelente Bueno Puntaje
mejora acept.
Evaluacin (5pts) (4pts) Logrado
(3pts) (0pts)
Conoce y utiliza los tipos
de datos
Conoce y utiliza
estructuras
condicionales
Conoce y utiliza
diagramas de flujo
Orden, Limpieza y
respeto.
Observaciones y
conclusiones
I.- OBJETIVOS:
1. Escribe pseudocdigos declarando variables y utilizando pseudocdigos.
II.- SEGURIDAD:
Advertencia:
En este laboratorio est prohibida la manipulacin del
hardware, conexiones elctricas o de red; as como la ingestin
de alimentos o bebidas.
Al culminar la sesin de laboratorio, apagar correctamente la
computadora y el monitor.
V.- RECURSOS:
En este laboratorio cada alumno trabar con un equipo con Windows.
Microsoft Excel 2013.
VII.- PROCEDIMIENTO:
Nota:
Las secciones en cursivas son demostrativas, pero sirven para que usted pueda instalar las herramientas de
desarrollo en un equipo externo.
Sub descuentotardanza()
End Sub
c. Seleccione cualquier celda que contenga la hora y ejecute el macro Qu es lo que hace el
programa?
d. Modifique el programa para que aplique la tardanza a los 15 minutos despus de las 8, en
vez de a los 40.
e. Cree el diagrama que flujo que represente el programa.
a. Para esto cree un botn (al igual que en el laboratorio anterior) y nmbrelo
descuentovolumen y asgnele un nuevo macro llamado descuentovolumen.
Sub descuentovolumen()
Dim cantidad1 As Double
Dim cantidad2 As Double
Dim cantidad3 As Double
Dim precio1 As Double
Dim precio2 As Double
Dim precio3 As Double
Dim precio4 As Double
Dim unid As Double
cantidad1 = Range("a2")
cantidad2 = Range("a3")
cantidad3 = Range("a4")
precio1 = Range("b2")
precio2 = Range("b3")
precio3 = Range("b4")
precio4 = Range("b5")
unid = Range("b8")
3. En la hoja 3 nos encargaremos de crear dos macros que calculen ciertos beneficios para los
trabajadores
a. Toda el rea comercial se desplaza constantemente para cubrir rutas segn zonas, los
puestos de mando medio en adelante utilizan su movilidad propia y los dems usan el
transporte pblico para realizar este recorrido mensual.
b. Se asigna a cada uno un monto especfico: Si el sueldo est por encima de los 2500 soles,
el monto ser de 600 soles. Si est por debajo de 2500 soles, el monto ser de 450 soles.
c. El cree un macro con el siguiente cdigo, ubquese en la celda donde desea calcular la
movilidad y ejectelo.
Sub calc_movilidad()
Dim sueldo As Integer
sueldo = Cells(ActiveCell.Row, ActiveCell.Column - 1).Value
If sueldo >= 2500 Then
ActiveCell = 600
Else
ActiveCell = 450
End If
End Sub
d. Usando como referencia el cdigo anterior cree un macro que permita calcular la alimentacin
segn las siguientes pautas.
e. Si el colaborador tiene un sueldo menor a 2000 soles se le cubre al 100% la alimentacin en
el concesionario de la empresa, por lo que el beneficio es de 200 soles. Si tiene un sueldo
mayor a 2000 soles, la alimentacin se cubre al 50% por lo que el beneficio sera slo de 100
soles. Saldra un mensaje con la explicacin del monto asignado.
CONCLUSIONES
OBSERVACIONES: