結果

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

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 190 ms
5,248 KB
testcase_01 AC 333 ms
5,376 KB
testcase_02 AC 774 ms
5,376 KB
testcase_03 AC 688 ms
5,376 KB
testcase_04 AC 934 ms
5,376 KB
testcase_05 AC 664 ms
5,376 KB
testcase_06 AC 546 ms
5,376 KB
testcase_07 AC 833 ms
5,376 KB
testcase_08 AC 803 ms
5,376 KB
testcase_09 AC 49 ms
5,376 KB
testcase_10 AC 49 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,S=2500000;long z,a,e;void f(int n){z=0;foreach(c;
`    !')D,.Z#Q;X2*,1EHKAMQ(9F=#CL36BU-9B6=19Q\V;LPBB\P!.?9"QR$COW,T6PH0;I;_?;YN2XK)(_ -/B9U*32,+D\^NQ$ Z6-K4%O@834^7 -_WC!H9MS=M9>.D([Z$D-_Z]E20SLC_<QW &7H,@UR$ +ZA ,N,\ZI?V[*NE/T3 T[I0CS'2R?TM@$<0(11NW3E4:660VC&L,G1Z/F<(0S.1J/DVR5M[1.P&&1YQG:7X1QRB";WO#-CH#[<ZE*F$:%%>F>OCC)U9,AA>YT=]KLFPX -U^>PX_>8!/E&?OM>%Y)G2O=R!<LL%+K0=A(,ML^>6##W=F(\U#]3^J5P!KDNR^$#($Y*C@I+>H&R@\R[7Z QG^^W$&C #CLU928"#P5 2H.O-WH#+%CA9YQV4M:#38W.$K,>L/*):$T&VHJ_<'V[\5_5S\#$T>^;KPR.4@=9E0!B>^K%2P:W[-F.M.LFD(&YF!+"5_$AJ8B[F&T O&LO,! '!5E)]^,1D%!WP($XD\&XYO)U U.<*T*'(,]W>OI4U0%[7S^QM9$2T8_OK.,6"=)D.3R["5V"D=V4X$5_*-.FSK5FE="LFGTL&%7L!HKAE4LV=_;JR'J) M;L>8>3 M(8#CT$"!V*QT5*+IQ%F6EKZ1"9M?'=B]RPUDZA8!W9VC-:C2:]PWO(5O^E.DN(G98PW7 E $U4VQ]JO%I*7NS9U+1X]4IF*#)*LSI>SPSA+(VEWIRD=I<?DOP9=%O)/X#^OC4([%O</&"W?.\MIVJ9AH>IMJM&2),<ULK2)9ED'Z#)0(=WW[GPGV7NG[8$+G7BRQ)8\E^$ ZN%058*6Y:H@R6N-CGAXP$6XAX/JEJ90/W7:CXNQT!.<N?O9&ZBDUZCD7^8&NOF4;DU,D1\YR6R1! TQVL,&09<==W6Q/=9P$3%CT_Q<V,7/CB%H;+3+(AH*3630%Z:F6O;^Z< 3%??V$Z>AI[0 0(111DS="AFU2]5?KM<=;%^&F/*R$H"O\#I$%U,3W=<$F*SC-JA2WGZOD2>H=%$<EZ"RF<TFX/WB/1&J?GI=MW=2F=7,*\)C(=!^)U7))*I#F<^.M@#7IA;9<HR"97;1&["G+5?8F!C#?8'+*5=\'-N$GKLVP7ZGU!Z6GQ"W3P EH%DVRF9 3U44#\!C.><H&[$>'VJ_0+)US00*BCE/,Y]EK+G-['\8@(>;^FFDE,3J00M*SY^(ORAH-:X/QA->3<,O-S3GCH"H73<B] CC;,%04N:Z57PL5LIID=+SUV<]^D;H>*-  U,Q-(TB%?[7"3L>,]+L_T*%Y+H:MXB6WAE[^182CMX;:%2$61N8F,[+"W(P]$-?M6D[D(H1/1HP] GN>*C9IHRLQ.<YZV^P#>A<%N9)*K\?Y&/VJF'-3'MG$2;J>./W9^QQ*'T+A_, #%>G9U7LRS2"C2"/V+< HD0EZ8"NGB479:'W238L+_JI,$E?67I;LHW](:,FPKJ2BO!+,^$KUM3)G*H4OAT?,S/$E,[]Z*W3CU:,.3'*RKP/H"=S!W$L-YF8V\&E[5%AE.1\CG_\Z+JHA.,R@NF LG5RU(%?+9PW2ZXY5 > ,''9:Q835)41'+O:>%D<91/TZP)G;N3R(O&Y66%#EB<91;\(2D45'A'D P47H&N*!7*)S(HT' ,%$V6]PBC$!2SWRP#G1!Z;S9R*Q&N)XJRK+(*> DKNIVI)&]#2-J8'F\)Q5D;&9$,V/27B! B(7;7=3+O@]Q8ME:4. 5(YVAH]M;J-?\B*.IHL6FRU(G"*<;$T%/^BB]'.Y&]*VUXUTXD!. K4*0D%Z["];(/AFD%F3^U]+C-_<G??18M$@#LW[RH"N;EEC/)I\""["=O'V@YB$_[TNG5-SO #I(A@PR?Q2R!E_9<#_(4KD@E/&^5SYD+:4#Z-I?3+]%ES3V@R=7J0A)B[/A?P&.WSL%EW6?96!!-&8XRA@G&==D7BRA)-8O 1*6 ,;IK'KMV,IH_6L`
[n/S*5..$][0..5])z=z<<6|c-32;for(;n%S;)z=z*n--%M;}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;a=0;if(l>=0&&l/M==r/M){f(r%M);a=z;f(l%M);for(e=M-2;e;e/=2,z=z*z%M)if(e&1)a=a*z%M;}a.writeln;}}
0