crear_enteros(0,[0]):-!.

crear_enteros(N,[N|L]):-
   N1 is N-1,
   crear_enteros(N1,L).
