結果
問題 |
No.593 4進FizzBuzz
|
ユーザー |
|
提出日時 | 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 |
ソースコード
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