結果

問題 No.171 スワップ文字列(Med)
コンテスト
ユーザー te-sh
提出日時 2016-09-07 17:25:21
言語 D
(dmd 2.109.1)
結果
AC  
実行時間 5 ms / 1,000 ms
コード長 892 bytes
コンパイル時間 907 ms
コンパイル使用メモリ 128,576 KB
実行使用メモリ 6,400 KB
最終ジャッジ日時 2024-06-12 04:13:34
合計ジャッジ時間 1,566 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 10
権限があれば一括ダウンロードができます

ソースコード

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;

const auto mod = 573;

void main()
{
  auto s = readln.chomp.map!(to!int).array;
  s.sort();
  auto gi = s.group.map!("a[1]").array;


  int[] primeFactors(int n) {
    auto pi = new int[](s.length + 1);
    auto p = 2;
    while (n > 1) {
      if (n % p == 0) {
        pi[p] += 1;
        n /= p;
      } else {
        p += (p == 2 ? 1 : 2);
      }
    }
    return pi;
  }

  auto pi = new int[](s.length + 1);
  foreach (i; 1..s.length + 1)
    pi[] += primeFactors(i.to!int)[];

  foreach (g; gi)
    foreach (h; 1..g + 1)
      pi[] -= primeFactors(h)[];

  auto r = 1;
  foreach (i, p; pi)
    foreach (_; 0..p)
      r = (r * i) % mod;

  writeln(r == 0 ? mod - 1 : r - 1);
}
0