'''1'''. Desenvolver um método para listar os vértices de uma árvore ordenada com raiz em "level order".
<pre>
10, 6, 12, 2, 8, 14, 18
</pre>
'''2'''. Implemente o insertion sort em Maple.
'''''Solução''''':
<pre>
InsertionSort:= proc(L::list)
local A:= < L >, j, key, i;
for j from 2 to nops(L) do
key:= A[j];
for i from j by -1 to 2 while A[i-1] > key do
A[i]:= A[i-1]
end do;
A[i]:= key
end do;
convert(A, list)
end proc;
</pre>