結果
| 問題 | 
                            No.3029 オイラー標数
                             | 
                    
| コンテスト | |
| ユーザー | 
                             ジュ・ビオレ・グレイス
                         | 
                    
| 提出日時 | 2025-02-06 22:37:29 | 
| 言語 | D  (dmd 2.109.1)  | 
                    
| 結果 | 
                             
                                WA
                                 
                             
                            
                            (最新)
                                AC
                                 
                             
                            (最初)
                            
                            
                         | 
                    
| 実行時間 | - | 
| コード長 | 532 bytes | 
| コンパイル時間 | 826 ms | 
| コンパイル使用メモリ | 87,216 KB | 
| 実行使用メモリ | 58,056 KB | 
| 最終ジャッジ日時 | 2025-02-08 19:25:39 | 
| 合計ジャッジ時間 | 7,898 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge4 / judge1 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| sample | AC * 3 | 
| other | AC * 10 WA * 17 | 
ソースコード
import std.array, std.conv, std.stdio, std.typecons;
alias Vert = ulong;
alias Edge = Tuple!(Vert, Vert);
alias Face = Tuple!(Vert, Vert, Vert);
void main() {
	auto Q = readln[0 .. $-1].to!ulong;
	bool[Vert] V;
	bool[Edge] E;
	bool[Face] F;
	foreach (_; 0 .. Q) {
		auto ABC = readln.split.to!(Vert[]);
		auto A = ABC[0], B = ABC[1], C = ABC[2];
		assert(A < B && B < C);
		V[A] = V[B] = V[C] = true;
		E[Edge(A, B)] = E[Edge(B, C)] = E[Edge(A, C)] = true;
		F[Face(A, B, C)] = true;
	}
	writeln(V.length - E.length + F.length);
}
            
            
            
        
            
ジュ・ビオレ・グレイス