Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Sorting-algorithms-Selection-sort/Erlang/sorting-algorithms-selection-sort.erl
+++ b/Task/Sorting-algorithms-Selection-sort/Erlang/sorting-algorithms-selection-sort.erl
@ -0,0 +1,16 @@
+-module(solution).
+-import(lists,[delete/2,max/1]).
+-compile(export_all).
+selection_sort([],Sort)-> Sort;
+selection_sort(Ar,Sort)->
+	M=max(Ar),
+	Ad=delete(M,Ar),
+	selection_sort(Ad,[M|Sort]).
+print_array([])->ok;
+print_array([H|T])->
+	io:format("~p~n",[H]),
+	print_array(T).	
+
+main()->
+	Ans=selection_sort([1,5,7,8,4,10],[]),
+	print_array(Ans).