結果

問題 No.935 う し た ぷ に き あ く ん 笑 ビ - ム
ユーザー daut-dlangdaut-dlang
提出日時 2019-11-29 22:51:03
言語 D
(dmd 2.106.1)
結果
WA  
実行時間 -
コード長 2,590 bytes
コンパイル時間 1,357 ms
コンパイル使用メモリ 108,060 KB
実行使用メモリ 227,032 KB
最終ジャッジ日時 2023-09-04 03:27:51
合計ジャッジ時間 22,334 ms
ジャッジサーバーID
(参考情報)
judge15 / judge14
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 WA -
testcase_01 AC 62 ms
20,848 KB
testcase_02 WA -
testcase_03 WA -
testcase_04 AC 336 ms
69,168 KB
testcase_05 AC 174 ms
60,520 KB
testcase_06 AC 233 ms
60,628 KB
testcase_07 AC 275 ms
65,032 KB
testcase_08 AC 1,130 ms
227,032 KB
testcase_09 AC 465 ms
76,448 KB
testcase_10 AC 499 ms
75,848 KB
testcase_11 WA -
testcase_12 AC 1 ms
4,376 KB
testcase_13 AC 1 ms
4,376 KB
testcase_14 AC 1 ms
4,380 KB
testcase_15 RE -
testcase_16 RE -
testcase_17 AC 211 ms
4,376 KB
testcase_18 AC 480 ms
75,620 KB
testcase_19 AC 341 ms
60,752 KB
testcase_20 AC 749 ms
85,188 KB
testcase_21 AC 27 ms
6,684 KB
testcase_22 AC 123 ms
25,448 KB
testcase_23 AC 2 ms
4,380 KB
testcase_24 AC 4 ms
4,376 KB
testcase_25 AC 3 ms
4,376 KB
testcase_26 AC 4 ms
4,376 KB
testcase_27 AC 2 ms
4,376 KB
testcase_28 WA -
testcase_29 AC 3 ms
4,376 KB
testcase_30 AC 3 ms
4,376 KB
testcase_31 AC 3 ms
4,384 KB
testcase_32 AC 4 ms
4,380 KB
testcase_33 AC 960 ms
220,588 KB
testcase_34 WA -
testcase_35 AC 608 ms
80,968 KB
testcase_36 AC 232 ms
63,132 KB
testcase_37 AC 632 ms
84,140 KB
testcase_38 AC 264 ms
59,932 KB
testcase_39 WA -
testcase_40 AC 685 ms
80,740 KB
testcase_41 AC 722 ms
81,764 KB
testcase_42 AC 686 ms
83,476 KB
testcase_43 WA -
testcase_44 AC 87 ms
21,364 KB
testcase_45 WA -
testcase_46 AC 29 ms
6,208 KB
testcase_47 AC 171 ms
23,864 KB
testcase_48 AC 468 ms
77,156 KB
testcase_49 AC 179 ms
24,916 KB
testcase_50 AC 477 ms
75,756 KB
testcase_51 AC 394 ms
69,848 KB
testcase_52 AC 377 ms
68,912 KB
testcase_53 AC 1,126 ms
225,412 KB
testcase_54 AC 319 ms
68,656 KB
testcase_55 AC 17 ms
6,188 KB
testcase_56 WA -
testcase_57 AC 311 ms
66,308 KB
testcase_58 AC 1 ms
4,376 KB
testcase_59 AC 2 ms
4,380 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
/dmd2/linux/bin64/../../src/phobos/std/numeric.d(2999): Warning: cannot inline function `std.numeric.gcdImpl!ulong.gcdImpl`

ソースコード

diff #

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

string FMT_F = "%.10f";

static File _f;
void file_io(string fn) { _f = File(fn, "r"); }
static string[] s_rd;
T _RD(T = long)() { while(!s_rd.length) s_rd = readln.chomp.split; string res = s_rd[0]; s_rd.popFront; return res.to!T; }
T _RD(T = long)(File f) { while(!s_rd.length) s_rd = f.readln.chomp.split; string res = s_rd[0]; s_rd.popFront; return res.to!T; }
T[] _RDA(T = long)(T fix = 0) { auto r = readln.chomp.split.to!(T[]); r[] += fix; return r; }
T[] _RDA(T = long)(File f, T fix = 0) { auto r = f.readln.chomp.split.to!(T[]); r[] += fix; return r; }
T RD(T = long)() { if (_f.isOpen) return _RD!T(_f); else return _RD!T; }
T[] RDA(T = long)(T fix = 0) { if (_f.isOpen)  return _RDA!T(_f, fix); else return _RDA!T(fix); }

size_t[] MAKE_IDX(alias less = "a < b", Range)(Range range) { auto idx = new size_t[](range.length); makeIndex!(less)(range, idx); return idx;}
size_t MIN_POS(alias less = "a < b", Range)(Range range) { auto r = minPos!(less)(range); return range.length - r.length; }

bool inside(T)(T x, T b, T e) { return x >= b && x < e; }
long lcm(long x, long y) { return x * (y / gcd(x, y)); }

long mod = 10^^9 + 7;
//long mod = 998244353;
//long mod = 1_000_003;
void moda(ref long x, long y) { x = (x + y) % mod; }
void mods(ref long x, long y) { x = ((x + mod) - (y % mod)) % mod; }
void modm(ref long x, long y) { x = (x * y) % mod; }

int binarySearch(alias pred, T)(in T[] arr, bool isLower = true)
{ 
	int ok, ng;
	if (isLower) { ok = cast(int)arr.length; ng = -1; }
	else		 { ok = -1; ng = cast(int)arr.length; }
	while (abs(ok-ng) > 1)
	{
		auto mid = (ok+ng) / 2;
		if (unaryFun!pred(arr[mid]))
			ok = mid;
		else ng = mid;
	}
	return ok;
}

void main()
{
	auto N = RD;
	auto S = RD!string;
	auto A = RDA;
	auto Q = RD;
	auto K = RDA;

	auto B = new long[2][](N+1);
	foreach (i; 0..N)
	{
		B[i+1][0] = B[i][0] + A[i];
		B[i+1][1] = B[i][1] + (S[i] == 'E' ? 1 : 0);
	}

	long[long] set;
	foreach (i; 0..N-1)
	{
		foreach (j; i..N)
		{
			auto c = B[j+1][0] - B[i][0];
			auto last = set.get(c, 0);
			set[c] = max(last, B[j+1][1] - B[i][1]);
		}
	}

	auto ans = new long[](Q);
	auto keys = set.keys;
	keys.sort();
	foreach (i; 0..Q)
	{
		auto p = keys.binarySearch!((long x) => x <= K[i])(false);
		auto pp = keys[0..p+1].MIN_POS!((long a, long b) => set[a] > set[b])();
		ans[i] = set[keys[pp]];
	}
	foreach (e; ans)
		writeln(e);
	stdout.flush;
	debug readln;
}
0