結果

問題 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
権限があれば一括ダウンロードができます

ソースコード

diff # 

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);
}
0