RosettaCodeData/Task/Letter-frequency/Aikido/letter-frequency.aikido
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

19 lines
343 B
Text

import ctype
var letters = new int [26]
var s = openin (args[0])
while (!s.eof()) {
var ch = s.getchar()
if (s.eof()) {
break
}
if (ctype.isalpha (ch)) {
var n = cast<int>(ctype.tolower(ch) - 'a')
++letters[n]
}
}
foreach i letters.size() {
println (cast<char>('a' + i) + " " + letters[i])
}