2012年12月13日

用Erlang实现二分查找算法

摘要: 算法实现如下 1 -module(bisearch). 2 -export([start/2]). 3 4 start(Value,List) -> 5 Len = length(List), 6 FirstValue = lists:nth(1, List), 7 LastValue = lists:nth(Len, List), 8 if FirstValue =:= Value orelse LastValue =:= Value -> 9 io:format("found ~w~n", [Value]); % 查找值在列表的首... 阅读全文

posted @ 2012-12-13 16:29 应无所住而生其心 阅读(536) 评论(0) 推荐(0) 编辑

用Erlang实现冒泡排序算法

摘要: 直接上代码 1 -module(bubblesort). 2 -export([start/1]). 3 4 start(List) -> 5 SortedList = sort(List, []), 6 io:format("SortedList:~w~n", [SortedList]). 7 8 %% 冒泡算法:每次step得到一个最大值,对余下的列表再进行递归调用 9 sort([], SortedList) ->10 SortedList;11 sort(List, SortedList) ->12 {Max, T} = step(List),13 阅读全文

posted @ 2012-12-13 09:50 应无所住而生其心 阅读(529) 评论(0) 推荐(0) 编辑

导航