show(N):-
N>0,write(N),tab(1),
 N1 is N-1,show(N1).