結果

問題 No.89 どんどんドーナツどーんといこう!
ユーザー LayCurse
提出日時 2014-12-30 13:54:37
言語 Perl
(5.16.3)
結果
WA  
実行時間 -
コード長 46 Byte
コンパイル時間 16 ms
使用メモリ 4,416 KB
最終ジャッジ日時 2020-01-16 00:07:16

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
001_in.txt WA -
002_in.txt WA -
003_in.txt AC 0 ms
4,116 KB
004_in.txt WA -
005_in.txt WA -
006_in.txt WA -
007_in.txt WA -
008_in.txt WA -
99_system_test1.txt AC 4 ms
4,148 KB
sample1 AC 0 ms
4,112 KB
sample2 WA -
テストケース一括ダウンロード
コンパイルメッセージ
Main.pl syntax OK

ソースコード

diff #
$C=<>*2.467;<>=~/ /;print$C*($`-$')**2*($`+$')
0