% Se tienen una serie de libros con el formato:
% libro(nombre,precio).
% Por medio de la regla presupuesto se costea el precio de C ejemplares de un libro.

libro(don_quijote,20).
libro(java,10).
libro(eneida,5).

presupuesto(L,C):-
	libro(L,P),
	Pres is C*P,
	write('El presupuesto de '),
	write(C),
	write(' ejemplares del libro '),
	write(L),
	write(' es '),
	write(Pres).

