結果

問題 No.148 試験監督(3)
ユーザー 👑 hos.lyrichos.lyric
提出日時 2015-02-13 09:09:11
言語 D
(dmd 2.106.1)
結果
AC  
実行時間 623 ms / 1,000 ms
コード長 2,750 bytes
コンパイル時間 744 ms
コンパイル使用メモリ 109,384 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-12 02:13:50
合計ジャッジ時間 5,450 ms
ジャッジサーバーID
(参考情報)
judge4 / judge2
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 109 ms
5,248 KB
testcase_01 AC 198 ms
5,376 KB
testcase_02 AC 531 ms
5,376 KB
testcase_03 AC 486 ms
5,376 KB
testcase_04 AC 612 ms
5,376 KB
testcase_05 AC 511 ms
5,376 KB
testcase_06 AC 406 ms
5,376 KB
testcase_07 AC 623 ms
5,376 KB
testcase_08 AC 497 ms
5,376 KB
testcase_09 AC 54 ms
5,376 KB
testcase_10 AC 54 ms
5,376 KB
testcase_11 AC 1 ms
5,376 KB
権限があれば一括ダウンロードができます

ソースコード

diff #

import std.bigint,std.conv,std.stdio,std.string;int M=10^^9+7;long f(int n){long z;foreach(c;
`    !OH R O],2Q[C,'31QR7Q$%M/B%\EM^I=,#NOLZ]94E_P3G;@6:(\=;X6V)_KTM,L'AIPEX+^5X(5DMNMA& H;L1?ZIQ,&@QN,5(W>5YI^= G8D2&!/ZX23GEAT+XU:508O )#(31E*;^'&_(\JO\YB-];S5&^_:GU#%-#>22DKOVO.\;[&\[IW;=]*?.6UD:B_T,I-ZP5<AY EP1/Z2Q8P7X/^PJ9*YS=)>3L@I&,"W?PAOJN%AD*=EJS<5"S<7Z$!+07;TC^Q[DG OX=*HIH+A8GZS$[V[N)\>@/7^X<=%J1-Q.V@S6@=K&Z'#F%1:N4+# ^ZHM\:E>G^A!?>T=?V*<$$IL[X75P].)YK/DSJ-I0R#(7@E4M/%<[%K6C"<A5%%??_NB-YSJ4&AM?9'8B!LZWGI:\SXEP0M IKB?)X(XI AV#\22=3E$[E6O4(5U=&<6=DP#J)9IFRY]F@[]D9,ZCU#AM(FR;T2J]1[XXGX0:E,BYD*GX?52,N@[@"6K04YXOG#I2@A"4KS+XV+4-HG./]!<<$S:BX"//')E9V]?X"J<:=W?>1=?F'@7%#&=X+4$H:B?D+W(!*J=;F GQ/E:? C/BVC22]&9\(Z60/&%L0Z[Y*0^Q)?N77DSA0N[GOH  SK)GAENH(_P;66;6E#_AP91EZW+8+ &0,I,-?M)YU_(>N#DLC 9QD XZX53KHBR<U(%J(>BDB$EFDK<D;,WBP4E.K?GA+J?P]_7V GT"LCZTD\E/H2>'\\[8TJ]'LY/&4UO#^C5W)H8X6/J);)K(Y<ZY8W6?1CYV/.;DJPQ&+B5*<8&*!J#NPLAJ4M!PX%&.)A5PO[6L;Y,8E@"+:LQ8R@^/-X43,0VB(%?J@:E4,\RTP\07-CSW60NC057Y7ZK;11X($FN_[2D27H#M1IU7U3;%0%'S)4K=A58!GBH46DW!5&;]&021B&J9RAZ$4O?O6V)15#?W/HWN-F *0_-6F)SE_8K@1]>QW;95*!31.V9"/RU4&U%N X"@%*L6:$(M@+Q5FUW=UX\,2Z-*/Q:D(9S_'JGB.VP8=!1<OQ\)5@(*W7&^OGCUNME\<-2DBBN)[.M?F;2L'1,_H7Z=YM?_:HW41K.8T::?73:S#%T/>-:@R-<U^L$NP0C8A2C7\!D\@\:J2<CXTOR'*0B!]I#W./<TM*::EUK)G)\;K!NJ:S]$(U+XR[/*<I*;K)C;H 1=YC:FAN$^!M6D#Z?M2\8EG<Z9YF&4(="=U&Z3AM(EG&,U<>[7XJ-_'B62GCE?70VYD ;Z-+XK<1%$G&I=&LUC0-:I"F*.?0"3W&XY$!$VO-!X?F:5FB@+\SW24/&G2]'%](^X1R$AD.ECGUJ$UG*C7-J:6(8KI[];Q'2C?+RG'319[T4/=]6+"88[/7H^EK05?N*DU[;6F_5*EX,0I 6HVCS7]JG/_YQ#B)54/1FTI7R$VTTL>2]T$A8Y0;S#S\8<@"NYN%90#5I\#*L^?S;_QQ12GMN;2ML$K+-FQ[Z">85A'#3QGGO:YT)=0B"7(OC:$SUZQ/RR&U"&.5751>6S5M$ER>K>YE4H*Q?%@SFZ#":"AG9]LQ70@@Y=0A)N'%A( >J?^5#:O\AU *G%#G6 (+]L&R@%_8C"W/(2IA+R=OI@\ZIJC#V'*F9SP%(IDF*[@QB^[XU+2Y=,O*CZ$%1LIQ6W.LIUIFGS 3=8QNT#*P,O/!MP]HEB F</2-#W.$2P:VHA'%_F2-ZVFJ,I-WK//3Z,:K$15LQZ?:;,*=(-Z'8_R:\'GR_6BHV@,DPE;23JV=Q1YFF3'-&(H*/R/.Z:4W[LWP:W!O!\RO<E"F,, EY. 9_.MMIWW.^1,S$8L@)0L8%QM3,G7,@W&G0J3]O,.D>% Q":Q JLBB$^Z #M4AR/K/Q#L-[A_)*ZHQCC!$8UQA%Y5"B\LBVKN!<+!1XOPG641'QT%)[34 (>IRSA:N\6^Q5Z4!,NWPC)/ ^M[8X@G?-_>'-8]#2M#=%Y$WTWAG>UY3VFAQ7V#;H8$^,M+X^TJ*P1DW%7 )).Z\0$_H6J#UY+L"?/;/.WEZ/O],3")#TPESCW>T,BT.AUJ:X9S$#^CU&WC[;$C@Z\&X(03X'%.52WOX$OR6WNB)(F]@S_,Y.RU#VC/SRERNV61)>H_'5=(Q3/&281#H\Q>9FP'6SB("B$CJF)>[%" L#=W:7;MLR[%3CEC7)F&K2Z-$@G)%$6NC$YJC016!U4YZDB32XQ1:^(*CXKG(@P0(;9B?=VLB=1W0^@K MN?9%U*^47YYSVL#V0%:H/^'?:RQ9?[1<JBNG62'HQ%Y5XL']OKU-'!16"?@[$2F)?6 ZFP"R-CM9G@G60YP@JXB.C[D'0-?,MJ+@@*)&`
[n/8^^7*5..$][0..5])z=z<<6|c-32;for(;n%8^^7;)z=z*n--%M;return z;}void main(){foreach(t;0..readln.chomp.to!int){auto s=readln.split;BigInt C=s[0],P=s[1],r=C+1-P,l=r-P;long a;if(l>=0&&l/M==r/M){a=f(r%M);for(long e=M-2,b=f(l%M);e;e/=2,b=b*b%M)if(e&1)a=a*b%M;}a.writeln;}}
0