結果

問題 No.769 UNOシミュレータ
コンテスト
ユーザー tatt61880
提出日時 2020-04-27 19:03:06
言語 Kuin
(KuinC++ v.2021.9.17)
結果
WA  
実行時間 -
コード長 1,389 bytes
コンパイル時間 1,972 ms
コンパイル使用メモリ 147,212 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-09-16 11:00:53
合計ジャッジ時間 3,530 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 17 WA * 6
権限があれば一括ダウンロードができます

ソースコード

diff # 

func main()
	var n: int :: cui@inputInt()
	var m: int :: cui@inputInt()
	var nums: []int :: #[n]int
	var reverseFlag: bool :: false
	var skipFlag: bool :: false
	var id: int :: 0
	var prev: []char
	var add: int :: 0
	for i(1, m)
		var s: []char :: cui@inputStr()
		switch(s)
		case "number"
			if(skipFlag)
				do skipFlag :: false
				do nums[id] :- add
				do next(&id, reverseFlag, n)
			end if
			do nums[id] :+ 1
			do add :: 0
		case "drawtwo", "drawfour"
			if(skipFlag & prev <> s)
				do skipFlag :: false
				do nums[id] :- add
				do next(&id, reverseFlag, n)
				do skipFlag :: true
				do nums[id] :+ 1
				do add :: 0
			else
				do add :+ s = "drawtwo" ?(2, 4)
				do skipFlag :: true
				do nums[id] :+ 1
			end if
		case "skip"
			if(skipFlag)
				do skipFlag :: false
				do nums[id] :- add
				do next(&id, reverseFlag, n)
			end if
			do nums[id] :+ 1
			do add :: 0
			if(i <> m)
				do next(&id, reverseFlag, n)
			end if
		case "reverse"
			if(skipFlag)
				do skipFlag :: false
				do nums[id] :- add
				do next(&id, reverseFlag, n)
			end if
			do reverseFlag :: !reverseFlag
			do nums[id] :+ 1
			do add :: 0
		end switch
		do prev :: s
		
		if(i <> m)
			do next(&id, reverseFlag, n)
		end if
	end for
	do cui@print("\{id + 1} \{nums[id]}\n")
	
	func next(id: &int, reverseFlag: bool, n: int)
		do id :+ reverseFlag ?(n - 1, 1)
		do id :% n
	end func
end func
0