Submission #11202742
Source Code Expand
use v5.18; # strict say state use warnings; use Math::BigInt; chomp (my ($n, $m, $p) = split / /, <STDIN>); my $modpow = Math::BigInt->new($n)->bmodpow($p, $m); say $modpow;
Submission Info
Submission Time | |
---|---|
Task | B - n^p mod m |
User | superrino1 |
Language | Perl (v5.18.2) |
Score | 100 |
Code Size | 180 Byte |
Status | AC |
Exec Time | 30 ms |
Memory | 4608 KB |
Compile Error
overload arg '..' is invalid at /usr/share/perl/5.18/Math/BigInt.pm line 155. ./Main.pl syntax OK
Judge Result
Set Name | Sample | All | ||
---|---|---|---|---|
Score / Max Score | 0 / 0 | 100 / 100 | ||
Status | AC |
|
Set Name | Test Cases |
---|---|
Sample | |
All | 001.txt, 002.txt, 003.txt, 004.txt, 005.txt, 006.txt, 007.txt, 008.txt, 009.txt, 010.txt, 011.txt, 012.txt, 013.txt, 014.txt, 015.txt, 016.txt, 017.txt, 018.txt, 019.txt, 020.txt, 021.txt, 022.txt, 023.txt, 024.txt, 025.txt, 026.txt, 027.txt, sample_01.txt, sample_02.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
001.txt | AC | 29 ms | 4480 KB |
002.txt | AC | 29 ms | 4480 KB |
003.txt | AC | 29 ms | 4480 KB |
004.txt | AC | 29 ms | 4480 KB |
005.txt | AC | 29 ms | 4480 KB |
006.txt | AC | 30 ms | 4608 KB |
007.txt | AC | 29 ms | 4480 KB |
008.txt | AC | 30 ms | 4480 KB |
009.txt | AC | 29 ms | 4480 KB |
010.txt | AC | 30 ms | 4480 KB |
011.txt | AC | 29 ms | 4480 KB |
012.txt | AC | 30 ms | 4480 KB |
013.txt | AC | 30 ms | 4480 KB |
014.txt | AC | 30 ms | 4608 KB |
015.txt | AC | 29 ms | 4480 KB |
016.txt | AC | 29 ms | 4608 KB |
017.txt | AC | 29 ms | 4480 KB |
018.txt | AC | 30 ms | 4480 KB |
019.txt | AC | 29 ms | 4480 KB |
020.txt | AC | 30 ms | 4480 KB |
021.txt | AC | 29 ms | 4480 KB |
022.txt | AC | 29 ms | 4480 KB |
023.txt | AC | 29 ms | 4480 KB |
024.txt | AC | 29 ms | 4480 KB |
025.txt | AC | 29 ms | 4480 KB |
026.txt | AC | 29 ms | 4480 KB |
027.txt | AC | 30 ms | 4480 KB |
sample_01.txt | AC | 30 ms | 4480 KB |
sample_02.txt | AC | 29 ms | 4480 KB |