score = {};

while (!WScript.StdIn.AtEndOfStream) {
  line = WScript.StdIn.ReadLine();
  tokens = line.split(/ +/);
  for (k in tokens) {
    word = tokens[k];
    if (score[word] == undefined) {
      score[word] = 1;
    } else {
      score[word]++;
    }
  }
}

delete score[""];
words = [];

for (word in score) {
  words.push(word);
}

words.sort();

for (i in words) {
  WScript.StdOut.WriteLine(words[i] + " " + score[words[i]]);
}