結果

問題 No.593 4進FizzBuzz
ユーザー むらため
提出日時 2019-01-18 10:47:59
言語 Nim
(2.2.0)
結果
RE  
実行時間 -
コード長 409 bytes
コンパイル時間 2,224 ms
コンパイル使用メモリ 60,976 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-07-01 10:15:26
合計ジャッジ時間 4,041 ms
ジャッジサーバーID
(参考情報)
judge1 / judge3
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 4
other AC * 12 RE * 19
権限があれば一括ダウンロードができます

ソースコード

diff #

proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "<stdio.h>" .}
proc scan(): (int,string) =
  var n = 0
  var s = ""
  while true:
    var k = getchar_unlocked()
    if k < '0' or k > '9': break
    else: n = 4 * n + k.ord - '0'.ord
    s &= k
  return (n,s)

let (n,s) = scan()
if n mod 15 == 0 : echo "FizzBuzz"
elif n mod 5 == 0 : echo "Buzz"
elif n mod 3 == 0 : echo "Fizz"
else : echo s
0