Prolog
Hola a todos! Me gustaría saber si alguien sabe como se pueden multiplicar dos listas(elemento por elemento) en Prolog.
1 Respuesta
Respuesta de diegodiazr
1
Aquí tienes mi solución, es recursiva. Y espero que te sea útil. Un saludo.
mult(x,y,Producto) :- Producto is x * y.
list_product([x|Xs],[y|Ys],[Producto|Productos]) :- list_product(Xs,Ys,Productos),mult(x,y,Producto).
?- list_product([1,2,3,4],[1,2,3,4],Producto).
Producto = [1, 4, 9, 16]
Yes
mult(x,y,Producto) :- Producto is x * y.
list_product([x|Xs],[y|Ys],[Producto|Productos]) :- list_product(Xs,Ys,Productos),mult(x,y,Producto).
?- list_product([1,2,3,4],[1,2,3,4],Producto).
Producto = [1, 4, 9, 16]
Yes
