aritmetica

UNIVERDIDAD NACIONAL MICAELA BASTIDAS
DE APURIMAC
GUIA Nº 2
INTELIGENCIA ARTIFICIAL
OBJETIVOS



Conocer una nueva un nuevo lenguaje de programación para desarrollo de Sistemas
ExpertosConocer los objetos comunes de LISP

MARCO TEORICO

1.3 Definición de nuevas funciones
1.3.1 Ejemplo: Definición de la función CUBO:
* (DEFUN CUBO (N)
(* N N N))
CUBO
* (CUBO 2)
=8
1.3.2Nota: La función primitiva para definir funciones es DEFUN. Una función esta
determinada por su nombre [en el ej. CUBO], la lista de sus parámetros [en el ej. N] y
su cuerpo [en el ej. (* N N N)]1.3.3 Ejercicio: Escribir una función P2 que calcule el valor del polinomio
ax2 + bx + c. Por ejemplo,
Solución:
(DEFUN P2 (A B C X)
(+ (* A X X) (* B X) C))
(P2 4 3 2 2) ---> 24
1.3.4 Ejemplo: (deprogramación descendente) Definir la función
(MEDIA-CUADRADO X Y) que devuelva la media de los cuadrados de X e Y.
* (DEFUN MEDIA-CUADRADO (X Y)
(MEDIA (CUADRADO X) (CUADRADO Y)))
MEDIA-CUADRADO* (DEFUN CUADRADO (X)
(* X X))
CUADRADO
* (CUADRADO 3)
9
* (DEFUN MEDIA (X Y)
(/ (+ X Y) 2))
MEDIA
Inteligencia Artificial
Ing. Mario Aquino Cruz

; TEST DE CUADRADO

UNIVERDIDADNACIONAL MICAELA BASTIDAS
DE APURIMAC
* (MEDIA 4 8)
6.0

; TEST DE MEDIA

* (MEDIA-CUADRADO 2 4)
10.0
1.3.5 Ejercicio: Definir CUADRADO-MEDIA tal que (CUADRADOMEDIA X Y) sea
el cuadrado de la mediade X e Y. Por ejemplo,
(CUADRADO-MEDIA 2 4) ---> 9.0
Solución:
(DEFUN CUADRADO-MEDIA (X Y)
(CUADRADO (MEDIA X Y)))
1.4 Variables globales y locales
1.4.1 Definición: La función LET:
(LET((VAR1 VAL1) ... (VARN VALN)) S1 ...SM) asocia a la variable VAR1 el valor
VAL1,..., a la variable VARN el valor VALN, calcula las expresiones S1,..., SM,
reconstruye el entorno y devuelve el valor deSM.
1.4.2 Ejemplo:
(SETQ X 1) ---> 1
(LET ((X 2) (Y 3)) (+ X Y)) ---> 5
X ---> 1
2. Funciones de búsqueda en listas
2.1 Definición: Las funciones CAR y CDR:
(CAR L) devuelve el primer elemento...