結果

問題 No.1512 作文
ユーザー yuruhiya
提出日時 2021-05-22 17:49:17
言語 Raku
(rakudo v2024.12)
結果
WA  
実行時間 -
コード長 114 bytes
コンパイル時間 2,187 ms
コンパイル使用メモリ 134,688 KB
実行使用メモリ 215,716 KB
最終ジャッジ日時 2024-10-10 16:05:28
合計ジャッジ時間 7,994 ms
ジャッジサーバーID
(参考情報)
judge1 / judge3
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample -- * 4
other AC * 3 WA * 1 TLE * 1 -- * 33
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

my@a=0 xx 123;get;for lines>>.ords.sort {
	@a[.[*-1]]=max @a[.[*-1]],@a[^.[0]+1].max+$_ if $_ eq.sort
}
say @a.max
0