結果

問題 No.152 貯金箱の消失
ユーザー te-shte-sh
提出日時 2018-07-11 16:11:31
言語 D
(dmd 2.106.1)
結果
AC  
実行時間 11 ms / 5,000 ms
コード長 764 bytes
コンパイル時間 880 ms
コンパイル使用メモリ 107,964 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-06-13 01:25:33
合計ジャッジ時間 1,730 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge5
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1 ms
6,816 KB
testcase_01 AC 1 ms
6,940 KB
testcase_02 AC 1 ms
6,940 KB
testcase_03 AC 1 ms
6,940 KB
testcase_04 AC 1 ms
6,940 KB
testcase_05 AC 1 ms
6,944 KB
testcase_06 AC 1 ms
6,940 KB
testcase_07 AC 2 ms
6,944 KB
testcase_08 AC 10 ms
6,940 KB
testcase_09 AC 11 ms
6,944 KB
testcase_10 AC 8 ms
6,940 KB
testcase_11 AC 4 ms
6,944 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
/home/linuxbrew/.linuxbrew/opt/dmd/include/dlang/dmd/std/numeric.d(2999): Warning: cannot inline function `std.numeric.gcdImpl!uint.gcdImpl`

ソースコード

diff # 

import std.algorithm, std.container, std.conv, std.math, std.range, std.typecons, std.stdio, std.string;
import std.numeric;

auto rdsp(){return readln.splitter;}
void pick(R,T)(ref R r,ref T t){t=r.front.to!T;r.popFront;}
void readV(T...)(ref T t){auto r=rdsp;foreach(ref v;t)pick(r,v);}

const mod = 1000003;

void main()
{
  int l; readV(l);

  auto l4 = l/4, r = 0;
  foreach (m; 2..l4.nsqrt)
    for (auto n = m%2+1; n < m; n += 2) {
      if (gcd(m, n) != 1) continue;
      if (m*(m+n)*2 > l/4) break;
      ++r;
    }

  writeln(r%mod);
}

pure T nsqrt(T)(T n)
{
  import std.algorithm, std.conv, std.range, core.bitop;
  if (n <= 1) return n;
  T m = T(1) << (n.bsr/2+1);
  return iota(1, m).map!"a * a".assumeSorted!"a <= b".lowerBound(n).length.to!T;
}
0