ABC218-D Rectangles

問題へのリンク

C#のソース

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

class Program
{
    static string InputPattern = "InputX";

    static List<string> GetInputList()
    {
        var WillReturn = new List<string>();

        if (InputPattern == "Input1") {
            WillReturn.Add("6");
            WillReturn.Add("0 0");
            WillReturn.Add("0 1");
            WillReturn.Add("1 0");
            WillReturn.Add("1 1");
            WillReturn.Add("2 0");
            WillReturn.Add("2 1");
            //3
        }
        else if (InputPattern == "Input2") {
            WillReturn.Add("4");
            WillReturn.Add("0 1");
            WillReturn.Add("1 2");
            WillReturn.Add("2 3");
            WillReturn.Add("3 4");
            //0
        }
        else if (InputPattern == "Input3") {
            WillReturn.Add("7");
            WillReturn.Add("0 1");
            WillReturn.Add("1 0");
            WillReturn.Add("2 0");
            WillReturn.Add("2 1");
            WillReturn.Add("2 2");
            WillReturn.Add("3 0");
            WillReturn.Add("3 2");
            //1
        }
        else {
            string wkStr;
            while ((wkStr = Console.ReadLine()) != null) WillReturn.Add(wkStr);
        }
        return WillReturn;
    }

    static void Main()
    {
        List<string> InputList = GetInputList();

        int[] wkArr = { };
        Action<string> SplitAct = pStr =>
            wkArr = pStr.Split(' ').Select(pX => int.Parse(pX)).ToArray();

        // Y座標のSet[X座標]なDict
        var YSetDict = new Dictionary<int, HashSet<int>>();

        foreach (string EachStr in InputList.Skip(1)) {
            SplitAct(EachStr);

            int X = wkArr[0];
            int Y = wkArr[1];

            if (YSetDict.ContainsKey(X) == false) {
                YSetDict[X] = new HashSet<int>();
            }
            YSetDict[X].Add(Y);
        }

        long Ansser = 0;

        int[] KeysArr = YSetDict.Keys.OrderBy(pX => pX).ToArray();
        for (int I = 0; I <= KeysArr.GetUpperBound(0); I++) {
            for (int J = I + 1; J <= KeysArr.GetUpperBound(0); J++) {
                HashSet<int> YSet1 = YSetDict[KeysArr[I]];
                HashSet<int> YSet2 = YSetDict[KeysArr[J]];

                var wkSet = new HashSet<int>(YSet1);
                wkSet.IntersectWith(YSet2);
                if (wkSet.Count > 0) {
                    Ansser += wkSet.Count * (wkSet.Count - 1) / 2;
                }
            }
        }
        Console.WriteLine(Ansser);
    }
}

解説

X座標ごとのY座標のSetを管理して、
X座標のペアごとのY座標の共通集合の要素数を求め、
共通集合の要素数 C 2
を解に計上してます。