結果

問題 No.81 すべて足すだけの簡単なお仕事です。
ユーザー %20
提出日時 2016-12-26 21:51:34
言語 Perl
(5.16.3)
結果
AC   *
実行時間 8 ms
コード長 73 Byte
コンパイル時間 17 ms
使用メモリ 2252 KB

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
01.txt AC 8 ms
2172 KB
02.txt AC 7 ms
2212 KB
03.txt AC 7 ms
2172 KB
04.txt AC 8 ms
2176 KB
05.txt AC 6 ms
2208 KB
06.txt AC 7 ms
2176 KB
07.txt AC 7 ms
2176 KB
08.txt AC 8 ms
2172 KB
09.txt AC 7 ms
2172 KB
10.txt AC 8 ms
2176 KB
challenge01.txt AC 7 ms
2252 KB
challenge02.txt AC 7 ms
2240 KB
challenge03.txt AC 7 ms
2240 KB
system_test1.txt AC 6 ms
2176 KB
system_test2.txt AC 7 ms
2176 KB
テストケース一括ダウンロード

ソースコード

diff #
<>;print`tr \\\\n- +_|dc -e?Ak1/p`=~s/^0/'.'.0 x10/er=~s/^(-?)\./${1}0./r
0