結果

問題 No.316 もっと刺激的なFizzBuzzをください
ユーザー nobuta05
提出日時 2022-04-07 00:01:04
言語 D
(dmd 2.109.1)
結果
AC  
実行時間 2 ms / 1,000 ms
コード長 1,684 bytes
コンパイル時間 747 ms
コンパイル使用メモリ 105,324 KB
実行使用メモリ 6,948 KB
最終ジャッジ日時 2024-06-22 14:49:10
合計ジャッジ時間 2,079 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 33
権限があれば一括ダウンロードができます

ソースコード

diff #
プレゼンテーションモードにする

import std.stdio, std.string, std.conv;
import std.algorithm, std.math;
import std.range;
import std.container.rbtree, std.container.dlist;
import std.container.binaryheap, std.container.array;
import std.typecons;
// import std.meta;
alias mstring = char[];
const long INF = 1L << 60L;
// const long mod = 1_000_000_000 + 7;
const long mod = 998_244_353L;
void chmin (T)(ref T x, T y) {
  x = min(x, y);
}
void chmax (T)(ref T x, T y) {
  x = max(x, y);
}
// 単一の数値を取得
// readln.chomp.to!int;
//  or
// int a;
// readf("%s\n", a);
// 複数の数値を取得(可変数個の場合推奨)
// readln.chomp.split.map!(to!long).array
// 複数の数値を取得(固定数個の場合、推奨)
// int a, b;
// readf("%s %s\n", &a, &b);
// インデントを一個ずらして複数の数値を取得(累積和とかで1-indexedの方が良い時がある)
// long[] vs = readln.chomp.split.map!(to!long).array;
// vs = [0L] ~ vs;
// 小数点は以下で指定
// double ret = 10.0;
// writefln("%.12f", ret);
// 配列の最後の要素は arr[$-1] でアクセスできる
long gcd (long m, long n) {
  if (m < n)
    swap (m, n);
  if (n == 0)
    return m;
  return gcd(n, m % n);
}
void main () {
  long N = readln.chomp.to!long;
  auto as = readln.chomp.split.map!(to!long).array;
  int n = as.length.to!int;
  long ret = 0L;
  foreach (bits; 1 .. (1 << n)) {
    long mul = 1L;
    int cnt = 0;
    foreach (i; 0 .. n) {
      if ((bits >> i) & 1) {
        long g = gcd(mul, as[i]);
        mul *= as[i];
        mul /= g;
        cnt++;
      }
    }
    if (cnt % 2 == 1)
      ret += N / mul;
    else
      ret -= N / mul;
  }
  writeln(ret);
}
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0