Submission #3332736
Source Code Expand
var i:Longint; n,k:int64; function power(a,b:int64):int64; var s:int64; begin if b=0 then power:=1 else begin s:=power(a*a mod 1000000007,b div 2); if b mod 2=1 then s:=s*a mod 1000000007; power:=s; end; end; function C(a,b:int64):int64; var m,sa,sb:int64; i:Longint; begin sa:=1; sb:=1; m:=1000000007; for i:=1 to b do begin sb:=sb*i mod m; sa:=sa*(a-i+1)mod m; end; C:=sa*power(sb,m-2)mod m; end; begin read(n,k); if n>k then writeln(C(n+k-1,k))else writeln(C(n,k mod n)); end.
Submission Info
Submission Time | |
---|---|
Task | B - 高橋幼稚園 |
User | kotatsugame |
Language | Pascal (FPC 2.6.2) |
Score | 100 |
Code Size | 536 Byte |
Status | AC |
Exec Time | 0 ms |
Memory | 128 KB |
Compile Error
/usr/bin/ld.bfd: warning: ./link.res contains output sections; did you forget -T?
Judge Result
Set Name | Sample | Subtask1 | Subtask2 | ||||||
---|---|---|---|---|---|---|---|---|---|
Score / Max Score | 0 / 0 | 80 / 80 | 20 / 20 | ||||||
Status |
|
|
|
Set Name | Test Cases |
---|---|
Sample | subtask0_sample_01.txt, subtask0_sample_02.txt, subtask0_sample_03.txt |
Subtask1 | subtask0_sample_01.txt, subtask0_sample_02.txt, subtask1_01.txt, subtask1_02.txt, subtask1_03.txt, subtask1_04.txt, subtask1_05.txt, subtask1_06.txt, subtask1_07.txt, subtask1_08.txt, subtask1_09.txt, subtask1_10.txt, subtask1_11.txt, subtask1_12.txt, subtask1_13.txt, subtask1_14.txt, subtask1_15.txt, subtask1_16.txt, subtask1_17.txt, subtask1_18.txt, subtask1_19.txt |
Subtask2 | subtask0_sample_01.txt, subtask0_sample_02.txt, subtask0_sample_03.txt, subtask1_01.txt, subtask1_02.txt, subtask1_03.txt, subtask1_04.txt, subtask1_05.txt, subtask1_06.txt, subtask1_07.txt, subtask1_08.txt, subtask1_09.txt, subtask1_10.txt, subtask1_11.txt, subtask1_12.txt, subtask1_13.txt, subtask1_14.txt, subtask1_15.txt, subtask1_16.txt, subtask1_17.txt, subtask1_18.txt, subtask1_19.txt, subtask2_01.txt, subtask2_02.txt, subtask2_03.txt, subtask2_04.txt, subtask2_05.txt, subtask2_06.txt, subtask2_07.txt, subtask2_08.txt, subtask2_09.txt, subtask2_10.txt, subtask2_11.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
subtask0_sample_01.txt | AC | 0 ms | 128 KB |
subtask0_sample_02.txt | AC | 0 ms | 128 KB |
subtask0_sample_03.txt | AC | 0 ms | 128 KB |
subtask1_01.txt | AC | 0 ms | 128 KB |
subtask1_02.txt | AC | 0 ms | 128 KB |
subtask1_03.txt | AC | 0 ms | 128 KB |
subtask1_04.txt | AC | 0 ms | 128 KB |
subtask1_05.txt | AC | 0 ms | 128 KB |
subtask1_06.txt | AC | 0 ms | 128 KB |
subtask1_07.txt | AC | 0 ms | 128 KB |
subtask1_08.txt | AC | 0 ms | 128 KB |
subtask1_09.txt | AC | 0 ms | 128 KB |
subtask1_10.txt | AC | 0 ms | 128 KB |
subtask1_11.txt | AC | 0 ms | 128 KB |
subtask1_12.txt | AC | 0 ms | 128 KB |
subtask1_13.txt | AC | 0 ms | 128 KB |
subtask1_14.txt | AC | 0 ms | 128 KB |
subtask1_15.txt | AC | 0 ms | 128 KB |
subtask1_16.txt | AC | 0 ms | 128 KB |
subtask1_17.txt | AC | 0 ms | 128 KB |
subtask1_18.txt | AC | 0 ms | 128 KB |
subtask1_19.txt | AC | 0 ms | 128 KB |
subtask2_01.txt | AC | 0 ms | 128 KB |
subtask2_02.txt | AC | 0 ms | 128 KB |
subtask2_03.txt | AC | 0 ms | 128 KB |
subtask2_04.txt | AC | 0 ms | 128 KB |
subtask2_05.txt | AC | 0 ms | 128 KB |
subtask2_06.txt | AC | 0 ms | 128 KB |
subtask2_07.txt | AC | 0 ms | 128 KB |
subtask2_08.txt | AC | 0 ms | 128 KB |
subtask2_09.txt | AC | 0 ms | 128 KB |
subtask2_10.txt | AC | 0 ms | 128 KB |
subtask2_11.txt | AC | 0 ms | 128 KB |