結果

問題 No.509 塗りつぶしツール
ユーザー tails
提出日時 2017-04-28 22:29:18
言語 Perl
(5.16.3)
結果
AC  
実行時間 4 ms
コード長 92 Byte
コンパイル時間 192 ms
使用メモリ 4,100 KB
最終ジャッジ日時 2020-01-24 08:07:49

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
00_sample0.txt AC 0 ms
4,016 KB
00_sample1.txt AC 4 ms
3,996 KB
00_sample2.txt AC 0 ms
4,012 KB
10_gen_case1.txt AC 4 ms
4,020 KB
10_gen_case2.txt AC 0 ms
4,032 KB
10_gen_case3.txt AC 4 ms
3,936 KB
10_gen_case4.txt AC 0 ms
3,908 KB
10_gen_case5.txt AC 4 ms
4,092 KB
10_gen_case6.txt AC 4 ms
4,044 KB
10_gen_case7.txt AC 0 ms
3,908 KB
10_gen_case8.txt AC 4 ms
4,096 KB
10_gen_case9.txt AC 0 ms
3,904 KB
10_gen_case10.txt AC 4 ms
3,900 KB
10_gen_case11.txt AC 0 ms
4,020 KB
10_gen_case12.txt AC 0 ms
4,032 KB
10_gen_case13.txt AC 4 ms
3,904 KB
10_gen_case14.txt AC 0 ms
4,012 KB
10_gen_case15.txt AC 0 ms
4,072 KB
10_gen_case16.txt AC 4 ms
3,908 KB
10_gen_case17.txt AC 0 ms
4,036 KB
10_gen_case18.txt AC 4 ms
4,056 KB
10_gen_case19.txt AC 0 ms
3,996 KB
10_gen_case20.txt AC 0 ms
4,100 KB
20_handmade1.txt AC 4 ms
3,912 KB
20_handmade2.txt AC 0 ms
3,980 KB
20_handmade3.txt AC 0 ms
3,904 KB
20_handmade4.txt AC 4 ms
3,892 KB
99_corner1.txt AC 0 ms
3,996 KB
99_corner2.txt AC 4 ms
4,032 KB
99_corner3.txt AC 4 ms
4,096 KB
テストケース一括ダウンロード
コンパイルメッセージ
Main.pl syntax OK

ソースコード

diff #
$_=<>+0;
$a=y///c+2*(1+y/04689//+y/8//);
$b=y///c*2+(1+y/04689//+y/8//);
print $a<$b?$a:$b;
0