結果
問題 | No.769 UNOシミュレータ |
ユーザー |
|
提出日時 | 2020-04-27 19:08:51 |
言語 | Kuin (KuinC++ v.2021.9.17) |
結果 |
AC
|
実行時間 | 87 ms / 2,000 ms |
コード長 | 1,336 bytes |
コンパイル時間 | 2,206 ms |
コンパイル使用メモリ | 144,664 KB |
実行使用メモリ | 5,376 KB |
最終ジャッジ日時 | 2024-09-16 11:00:49 |
合計ジャッジ時間 | 3,992 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge1 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 23 |
ソースコード
func main()var n: int :: cui@inputInt()var m: int :: cui@inputInt()var nums: []int :: #[n]intvar reverseFlag: bool :: falsevar skipFlag: bool :: falsevar id: int :: 0var prev: []charvar add: int :: 0for i(1, m)var s: []char :: cui@inputStr()switch(s)case "number"if(skipFlag)do skipFlag :: falsedo nums[id] :- adddo add :: 0do next(&id, reverseFlag, n)end ifdo nums[id] :+ 1case "drawtwo", "drawfour"if(skipFlag & prev <> s)do skipFlag :: falsedo nums[id] :- adddo add :: 0do next(&id, reverseFlag, n)end ifdo add :+ s = "drawtwo" ?(2, 4)do skipFlag :: truedo nums[id] :+ 1case "skip"if(skipFlag)do skipFlag :: falsedo nums[id] :- adddo add :: 0do next(&id, reverseFlag, n)end ifdo nums[id] :+ 1if(i <> m)do next(&id, reverseFlag, n)end ifcase "reverse"if(skipFlag)do skipFlag :: falsedo nums[id] :- adddo add :: 0do next(&id, reverseFlag, n)end ifdo reverseFlag :: !reverseFlagdo nums[id] :+ 1end switchdo prev :: sif(i <> m)do next(&id, reverseFlag, n)end ifend fordo cui@print("\{id + 1} \{nums[id]}\n")func next(id: &int, reverseFlag: bool, n: int)do id :+ reverseFlag ?(n - 1, 1)do id :% nend funcend func