結果

問題 No.173 カードゲーム（Medium）
ユーザー nebukuro09
提出日時 2017-11-25 19:06:45
言語 D
(dmd 2.109.1)
結果
AC  
実行時間 134 ms / 3,000 ms
コード長 1,046 bytes
コンパイル時間 2,722 ms
コンパイル使用メモリ 160,372 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-06-12 22:41:34
合計ジャッジ時間 4,587 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 10
権限があれば一括ダウンロードができます

ソースコード

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

import std.stdio;
import std.array;
import std.string;
import std.conv;
import std.algorithm;
import std.typecons;
import std.range;
import std.random;
import std.math;
import std.container;
int N;
int Pa, Pb;
bool simulate(int[] A, int[] B){
  int Sa, Sb;
  foreach (i; 0..N-1) {
    int a = Pa > uniform(0, 1000) ? 0 : uniform(1, N-i);
    int b = Pb > uniform(0, 1000) ? 0 : uniform(1, N-i);
    if (A[a] > B[b])
      Sa += A[a]+B[b];
    else if (B[b] > A[a])
      Sb += A[a]+B[b];
    A = A[0..a] ~ A[a+1..$];
    B = B[0..b] ~ B[b+1..$];
  }
  if (A[0] > B[0])
    Sa += A[0]+B[0];
  else if (B[0] > A[0])
    Sb += A[0]+B[0];
  return Sa > Sb;
}
void main() {
  auto input = readln.split;
  N = input[0].to!int;
  Pa = (input[1]~"000")[2..5].to!int;
  Pb = (input[2]~"000")[2..5].to!int;
  auto A = readln.split.map!(to!int).array.sort.array;
  auto B = readln.split.map!(to!int).array.sort.array;
  int ans = 0;
  int times = 20000;
  foreach (i; 0..times)
    if (simulate(A, B))
      ans += 1;
  writeln(ans.to!double / times);
}
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0