在线等,冒泡排序的实现
求教这个在线等,谁会算这个函数
各路大圣
你平时用到排序么? lists:sort/1 lists:sort/2
建议你去看一下这两个函数的源码 回复 3# flagcugb
大圣{:yxh4:}遇到的技术难题,你如何解决?
希望这个问题带给大家进步和成长
Er真心姿态优美,窈窕婀娜的仪态,令人赏心悦目。
优美是对语言的最基本的要求。{:yxh4:}
%-compile(export_all).
%-export().
-define (PP (V), io:format ("~s = ~p~n", [??V, V])).
bobso(L) -> bobso([], L, 1, length(L)).
bobso(_, L, X, N) when X == N -> L;
bobso(U, , X, N) -> bobso([], U ++ , X + 1, N);
bobso(U, , X, N) when A > B -> bobso(U ++ , , X, N);
bobso(U, , X, N) -> bobso(U ++ , ,X, N).
main(_) ->
L = ,
S = bobso(L),
?PP(S)
.
冒泡不是效率最差的排序算法么?
merge-sort 应该更好些吧?
谁有空给写一下 ?
页:
[1]