いろんな言語で宿題スレ

いろんな言語で宿題スレ at TECH

247:デフォルトの名無しさん
09/06/20 05:37:07
>>246
順併合というソートと誤解されるかな。

二つの文字列を交互に併合する(Str1,Str2,Str) :-
　　atom_chars(Str1,Chars1),
　　atom_chars(Str2,Chars2),
　　交互併合(Chars1,Chars2,Chars3),
　　atom_chars(Str,chars3).

交互併合([],L,L) :- !.
交互併合([A|R1],L2,[A|R]) :-
　　交互併合(L2,R1,R).

次ページ

続きを表示

1を表示