Las matem谩ticas discretas son el apartado donde podemos filosofar jajaja porque haces comparaciones o llegas a deducciones en base a la l贸gica proposicional, por ejemplo la frase: ella esta feliz o esta enojada, aqu铆 tenemos una oraci贸n que que podemos primero convertir a l贸gica:
Proposiciones
p = esta feliz
q = esta enojada
como se simboliza
p V q
Esta es una disyunci贸n
Vean los datos de Wikipedia Disyunci贸n l贸gica
Luego esto lo podemos ver en una tabla de verdad
p |
q |
p V q |
V |
V |
V |
V |
F |
V |
F |
V |
V |
F |
F |
F |
Esta tabla lo que nos dice es que puede cumplir las 2 condiciones y es cierta la afirmaci贸n o con que sea verdad alguna de las proposiciones p, q se cumplan la sentencia es verdadera
Esto en electr贸nica tambi茅n tiene su propio s铆mbolo que es el que se muestra en la imagen
Despu茅s esto lo pasamos a c贸digo de programaci贸n en una macro de Excel
Columna A1 es p
Columna B1 es q
Programar en excel
Es muy importante entender estas bases, porque en la programaci贸n siempre tendremos c谩lculos o transacciones que realizar siempre y cuando se cumplan ciertas condiciones por ejemplo un usuario o tu mismo,te planteas la automatizaci贸n de un proceso:
Objetivo
"Realizar macro en Excel que tome de una hoja La cantidad de inventario y la multiplique por el precio unitario, solo si el tipo de inventario es materia prima (MA) que es la columna D y los c贸digos de los art铆culos son del proveedor ingresado en la Columna C es igual a Kato y el resultado lo debe mostrar en un mensaje"
- Primero vamos a revisar la sentencia, dice que debo considerar 2 cosas antes de realizar el c谩lculo
- que la columna C sea igual a MA
- que la columna D sea igual a Kato
Vamos a ver el c贸digo en nuestra macro
C贸digo
Private Sub CommandButton1_Click()
Dim Fila,cont As Integer
Fila = 2
cont = 0
Do While Cells(Fila, "A") <> ""
If Cells(Fila, "c") = "MA" And Cells(Fila, "D") = "KATO" _
Then cont = cont + (Cells(Fila, "b") * Cells(Fila, "g"))
Fila = Fila + 1
Loop
MsgBox "Total " & cont
End Sub
Primero definimos 2 variables una para ir avanzando en el archivo y otra para mostrar el total
Dim Fila,cont As Integer
Fila = 2
cont = 0
Despu茅s realizamos el ciclo, hasta que no encuentre items y hacemos la b煤squeda de nuestra informaci贸n
Do While Cells(Fila, "A") <> ""
If Cells(Fila, "c") = "MA" And Cells(Fila, "D") = "KATO" _
Then cont = cont + (Cells(Fila, "b") * Cells(Fila, "g"))
Fila = Fila + 1
Loop
Mostramos el resultado
MsgBox "Total " & cont
Corramos la macro con los siguientes datos
Resultado
Es un ejemplo muy sencillo de realizar validaciones en la informaci贸n y mostrar un resultado.
(por cierto si quieren saber m谩s de Inteligencia Artificial pueden ver en este mismo blog el post http://www.programacionparatodos.com/2020/05/inteligencia-artificial.html porque en realidad es mucho m谩s de IF y ELSE)
Y no es que sea malo, pero es muy cierto la vida cotidiana son una serie de decisiones y de condiciones que hay que cumplir para seguir cierta l贸gica, incluso cuando nosotros mismos decidimos entre ir un evento u otro, si siempre fu茅ramos coherentes podr铆amos utilizar la l贸gica para todo, pero no somos as铆 somos espontaneamos, tenemos emociones, estados de humor diferente, pero una computadora no, as铆 que ense帽arle todo esto es un mar de informaci贸n, le铆a hace tiempo que cada maquina para esto existen varios lenguajes de acuerdo a la pagina de Aditec el top son:
Adem谩s de la l贸gica matem谩tica la inteligencia artificial tiene muchas otras t茅cnicas y algoritmos, no solo son IF y ELSE.
Espero les haya gustado este post y el ejemplo les sea de utilidad, nos leemos la pr贸xima semana.
Comentarios
Publicar un comentario
Dejanos tus dudas y comentarios