結果

問題 No.769 UNOシミュレータ
ユーザー 👑 tatt61880tatt61880
提出日時 2020-04-27 19:08:51
言語 Kuin
(KuinC++ v.2021.9.17)
結果
AC  
実行時間 91 ms / 2,000 ms
コード長 1,336 bytes
コンパイル時間 2,324 ms
コンパイル使用メモリ 152,396 KB
実行使用メモリ 4,376 KB
最終ジャッジ日時 2023-10-14 16:41:58
合計ジャッジ時間 5,472 ms
ジャッジサーバーID
（参考情報） 		judge15 / judge12
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 2 ms
4,352 KB
testcase_01 AC 2 ms
4,352 KB
testcase_02 AC 2 ms
4,352 KB
testcase_03 AC 2 ms
4,376 KB
testcase_04 AC 2 ms
4,352 KB
testcase_05 AC 3 ms
4,352 KB
testcase_06 AC 2 ms
4,352 KB
testcase_07 AC 2 ms
4,348 KB
testcase_08 AC 2 ms
4,352 KB
testcase_09 AC 5 ms
4,352 KB
testcase_10 AC 5 ms
4,352 KB
testcase_11 AC 5 ms
4,352 KB
testcase_12 AC 32 ms
4,352 KB
testcase_13 AC 32 ms
4,348 KB
testcase_14 AC 32 ms
4,352 KB
testcase_15 AC 61 ms
4,348 KB
testcase_16 AC 61 ms
4,352 KB
testcase_17 AC 61 ms
4,356 KB
testcase_18 AC 91 ms
4,352 KB
testcase_19 AC 90 ms
4,352 KB
testcase_20 AC 91 ms
4,356 KB
testcase_21 AC 91 ms
4,352 KB
testcase_22 AC 2 ms
4,348 KB
権限があれば一括ダウンロードができます

ソースコード

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 add :: 0
				do next(&id, reverseFlag, n)
			end if
			do nums[id] :+ 1
		case "drawtwo", "drawfour"
			if(skipFlag & prev <> s)
				do skipFlag :: false
				do nums[id] :- add
				do add :: 0
				do next(&id, reverseFlag, n)
			end if
			do add :+ s = "drawtwo" ?(2, 4)
			do skipFlag :: true
			do nums[id] :+ 1
		case "skip"
			if(skipFlag)
				do skipFlag :: false
				do nums[id] :- add
				do add :: 0
				do next(&id, reverseFlag, n)
			end if
			do nums[id] :+ 1
			if(i <> m)
				do next(&id, reverseFlag, n)
			end if
		case "reverse"
			if(skipFlag)
				do skipFlag :: false
				do nums[id] :- add
				do add :: 0
				do next(&id, reverseFlag, n)
			end if
			do reverseFlag :: !reverseFlag
			do nums[id] :+ 1
		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