Problem:
MathJax.Hub.Config({ tex2jax: { inlineMath: [["$","$"], ["\\(","\\)"]], processEscapes: true }});

関連商品

インターネット通販サイトでは、ユーザが現在見ている商品と同じページに、過去に他のユーザによって、現在見ている商品と一緒に買われた別の商品をいくつか表示してくれます。関連性の高いと思われる商品を提示することで、売り上げを伸ばすことができると考えられているからです。

似たようなことは、一緒に買われることが多い商品を近くに配置する、という工夫として、近所のスーパーマーケットでも目にすることができます（例えば、パンとジャムのような）。あなたの仕事は、商品配置の工夫を助けるプログラムを書くことです。今回は、ある基準となる回数を設定し、一緒に買われた回数が基準回数以上である、２つの商品の組み合わせを求めたいと思います。

一緒に買われた商品の情報と基準回数が与えられたとき、基準回数以上一緒に買われた商品２つの組み合わせを出力するプログラムを作成せよ。

Input

入力は以下の形式で与えられる。

N F
info1
info2
:
infoN

１行目に、一緒に買われた商品の情報の数 N (1 ≤ N ≤ 100) と、基準回数 F (1 ≤ F ≤ 100) が与えられる。続く N行に、一緒に買われた商品の情報が与えられる。一緒に買われた商品の情報 infoi は、以下の形式で与えられる。

M item1 item2 ... itemM

M (1 ≤ M ≤ 10) は、この情報がいくつの商品を含むかを表す。itemj は、この買い物で買われた商品の名前であり、英小文字だけから成る長さ 1 以上 30 以下の文字列である。infoi の中に同じ商品が与えられることはない。

Output

１行目に基準回数以上一緒に買われた商品２つの組み合わせの数を出力し、２行目以降に組み合わせをすべて出力する。ただし、組み合わせが一つもない場合は２行目以降には何も出力しない。

出力の順番は、組み合わせ内の商品名どうしを、辞書式順序（英和辞書で単語が並んでいる順番）で並べたあと、組み合わせどうしについては以下のようにする。

一つ目の商品名どうしを比較して、辞書式順序で早いほうが先。

同じ場合は、二つ目の商品名どうしを比較して、辞書式順序で早いほうが先。

商品名はスペース一つで区切り、商品の組み合わせは改行一つで区切る。

Sample Input 1

5 2
3 bread milk banana
2 milk cornflakes
3 potato bread milk
4 cornflakes bread milk butter
2 potato bread

Sample Output 1

3
bread milk
bread potato
cornflakes milk

Sample Input 2

5 5
3 bread milk banana
2 milk cornflakes
3 potato bread milk
4 cornflakes bread milk butter
2 potato bread

Sample Output 2

0

Solution in C# (judge verdict: Accepted)

using System.Linq;
using System.Collections.Generic;
using System;

public class hello
{
    public static void Main()
    {
        var d = new Dictionary<string, List<int>>();
        string[] line = Console.ReadLine().Trim().Split(' ');
        var n = int.Parse(line[0]);
        var f = int.Parse(line[1]);
        for (int i = 1; i <= n; i++)
        {
            string[] s = Console.ReadLine().Trim().Split(' ');
            var n1 = int.Parse(s[0]);
            for (int j = 0; j < n1; j++)
                if (d.ContainsKey(s[j + 1])) d[s[j + 1]].Add(i);
                else d[s[j + 1]] = new List<int>() { i };
        }
        var tlist = d.OrderBy(x => x.Key).ToList();
        var anslist = new List<string>();
        for (int i = 0; i < d.Count(); i++)
            for (int j = i+1 ; j < d.Count() ; j++)
            {
                var pcount = 0;
                foreach (var x in tlist[i].Value)
                    foreach (var y in tlist[j].Value)
                        if (x == y) pcount++;
                if (pcount >= f) { anslist.Add(tlist[i].Key); anslist.Add(tlist[j].Key); }
            }
        var a = anslist.Count();
        Console.WriteLine(a/2);
        for (int i = 0; i < a; i += 2)
            Console.WriteLine("{0} {1}", anslist[i], anslist[i + 1]);
    }
}