結果

問題 No.7 プライムナンバーゲーム
ユーザー tailstails
提出日時 2017-05-11 23:51:21
言語 Perl
(5.38.2)
結果
WJ  
(最新)
AC  
(最初)
実行時間 -
コード長 84 bytes
最終ジャッジ日時 2023-08-21 17:23:46
ジャッジサーバーID
(参考情報)
judge12 / judge14
このコードへのチャレンジ
(要ログイン)

ソースコード

diff #

map{push@@,/$$/g;$l[$++]=!grep$l[$-$_],@@}`seq 2 1e4|factor`;print$l[<>]?Lose:Win
0