Anagrams: Difference between revisions
→{{header|Delphi}}
MaiconSoft (talk | contribs) No edit summary |
MaiconSoft (talk | contribs) |
||
Line 1,975:
end;
if Count > 0 then
Dict[i] := format('%.4d', [Count+1]) + ',' + words
else
Dict[i] := '';
Line 2,016:
Time pass(s): 90,92 sec
The anagrams that contain the most words has
Words:
Line 2,027:
abel,able,bale,bela,elba
</pre>
=={{header|E}}==
| |||