結果
問題 | No.7 プライムナンバーゲーム |
ユーザー | tails |
提出日時 | 2017-05-11 23:51:21 |
言語 | Perl (5.38.2) |
結果 |
WJ
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 84 bytes |
最終ジャッジ日時 | 2023-08-21 17:23:46 |
ジャッジサーバーID (参考情報) |
judge12 / judge14 |
(要ログイン)
ソースコード
map{push@@,/$$/g;$l[$++]=!grep$l[$-$_],@@}`seq 2 1e4|factor`;print$l[<>]?Lose:Win