結果

問題 No.101 ぐるぐる！あみだくじ！
コンテスト
ユーザー te-sh
提出日時 2016-09-09 22:13:23
言語 D
(dmd 2.109.1)
結果
AC  
実行時間 6 ms / 5,000 ms
コード長 791 bytes
コンパイル時間 777 ms
コンパイル使用メモリ 122,568 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-12 04:14:37
合計ジャッジ時間 2,062 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 37
権限があれば一括ダウンロードができます
コンパイルメッセージ
/home/linuxbrew/.linuxbrew/opt/dmd/include/dlang/dmd/std/numeric.d(2999): Warning: cannot inline function `std.numeric.gcdImpl!ulong.gcdImpl`

ソースコード

diff # 

import std.algorithm, std.array, std.container, std.range, std.bitmanip;
import std.numeric, std.math, std.bigint, std.random, core.bitop;
import std.string, std.regex, std.conv, std.stdio, std.typecons;

void main()
{
  auto n = readln.chomp.to!size_t;
  auto k = readln.chomp.to!size_t;
  auto ci = iota(k).map!(_ => readln.split.map!(to!size_t).map!("a - 1")).array;

  auto ni = new size_t[](n);
  foreach (i; 0..n) {
    auto p = i;
    foreach (c; ci) {
      if (p == c[0]) p = c[1];
      else if (p == c[1]) p = c[0];
    }
    ni[i] = p;
  }

  auto ri = new size_t[](n);
  foreach (i; 0..n) {
    auto p = i, c = 0;
    do {
      p = ni[p];
      c += 1;
    } while (p != i);
    ri[i] = c;
  }

  auto r = reduce!((a, b) => a / gcd(a, b) * b)(1.to!size_t, ri);
  writeln(r);
}
0