結果

問題 No.593 4進FizzBuzz
コンテスト
ユーザー tatt61880
提出日時 2021-02-28 16:52:39
言語 Kuin
(KuinC++ v.2021.9.17)
結果
RE  
実行時間 -
コード長 521 bytes
コンパイル時間 1,929 ms
コンパイル使用メモリ 145,620 KB
実行使用メモリ 7,680 KB
最終ジャッジ日時 2024-09-16 11:41:24
合計ジャッジ時間 8,860 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample RE * 4
other RE * 31
権限があれば一括ダウンロードができます

ソースコード

diff # 

func main()
	var s: []char :: #[2000001]char
	var n3: int :: 0
	var n5: int :: 0
	var i: int :: 0
	while loop(true)
		try
			do s[i] :: cui@inputChar()
		catch 0xE9170008
			break loop
		end try
		var d: int :: s[i] $ int - '0' $ int
		do n3 :+ d
		do n5 :+ ((i % 2 = 0) ?(1, -1)) * d
		do i :+ 1
	end while
	do s :: s.sub(0, i)
	if(n3 % 3 = 0 & n5 % 5 = 0)
		do cui@print("FizzBuzz\n")
	elif(n5 % 5 = 0)
		do cui@print("Buzz\n")
	elif(n3 % 3 = 0)
		do cui@print("Fizz\n")
	else
		do cui@print("\{s}\n")
	end if
end func
0