Word frequency: Difference between revisions
PascalABC.NET
m (→{{header|Wren}}: Minor tidy and rerun) |
(PascalABC.NET) |
||
Line 3,401:
7924 that
6661 it
</pre>
=={{header|PascalABC.NET}}==
<syntaxhighlight lang="delphi">
##
ReadAllText('135-0.txt').ToLower.MatchValues('\w+').EachCount
.OrderByDescending(w -> w.Value).Take(10).PrintLines
</syntaxhighlight>
{{out}}
<pre>
(the,41042)
(of,19952)
(and,14938)
(a,14527)
(to,13942)
(in,11208)
(he,9646)
(was,8620)
(that,7922)
(it,6659)
</pre>
| |||