Comment detail

リストを逆順に表示 (Nested Flatten)
たまには、早めに。多分、題意に沿って。
1
2
3
revp([]).
revp([X|Xs]):-revp(Xs),writeln(X).
:-revp([1,2,3,4,5]),halt.

Index

Feed

Other

Link

Pathtraq

loading...