09/07/10 03:49:35
>>421
% Prolog
t421(_文字ならび,_一文字ごとに空白を開けた逆順ならび) :-
t421(_文字ならび,[],_一文字ごとに空白を開けた逆順ならび).
t421([A],X,[A|X]) :- !.
t421([A|R1],L,X) :- t421(R1,[A,' '|R1],X).
09/07/10 03:49:35
>>421
% Prolog
t421(_文字ならび,_一文字ごとに空白を開けた逆順ならび) :-
t421(_文字ならび,[],_一文字ごとに空白を開けた逆順ならび).
t421([A],X,[A|X]) :- !.
t421([A|R1],L,X) :- t421(R1,[A,' '|R1],X).