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