Submission #32571
ソースコード
1 2 3 4 5 6 7 8 9 | $str1 = <STDIN>;chomp($str1); $str2 = <STDIN>;chomp($str2); $a = length($str1); $b = length($str2); if ($a > $b){print "HTN is stronger than TDN.\n" ;} if ($a < $b){print "TDN is stronger than HTN.\n" ;} if ($a == $b){print "Draw...\n" ;} |
ステータス
項目 | データ |
---|---|
問題 | 0882 - HランDB |
ユーザー名 | PerlC |
投稿日時 | 2018-04-10 22:51:40 |
言語 | Perl |
状態 | Accepted |
得点 | 1 |
ソースコード長 | 242 Byte |
最大実行時間 | 63 ms |
最大メモリ使用量 | 872 KB |
セット
セット | 得点 | Cases | |
---|---|---|---|
1 | ALL | 1 / 1 | * |
テストケース
ファイル名 | 状態 | 実行時間 | メモリ使用量 | # |
---|---|---|---|---|
input01.txt | AC | 63 ms | 608 KB |
1
|
input02.txt | AC | 19 ms | 676 KB |
1
|
input03.txt | AC | 15 ms | 872 KB |
1
|
input04.txt | AC | 24 ms | 684 KB |
1
|
input05.txt | AC | 21 ms | 748 KB |
1
|
input06.txt | AC | 39 ms | 692 KB |
1
|
input07.txt | AC | 31 ms | 760 KB |
1
|
input08.txt | AC | 17 ms | 696 KB |
1
|