結果

問題 No.539 インクリメント
ユーザー むらためむらため
提出日時 2019-01-26 14:40:17
言語 Nim
(2.0.2)
結果
AC  
実行時間 17 ms / 2,000 ms
コード長 1,291 bytes
コンパイル時間 2,191 ms
コンパイル使用メモリ 60,788 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-07-01 10:55:00
合計ジャッジ時間 2,859 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge3
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 2 ms
5,248 KB
testcase_01 AC 15 ms
5,376 KB
testcase_02 AC 17 ms
5,376 KB
testcase_03 AC 17 ms
5,376 KB
権限があれば一括ダウンロードができます

ソースコード

diff # 

template times*(n:int,body) = (for _ in 0..<n: body)
proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "<stdio.h>" .}
proc printf(formatstr: cstring){.header: "<stdio.h>", varargs.}
proc putchar_unlocked(c:char){. importc:"putchar_unlocked",header: "<stdio.h>" .}
proc scan(): int =
  while true:
    let k = getchar_unlocked()
    if k < '0': break
    result = 10 * result + k.ord - '0'.ord
var S : array[1_00010,char]
proc reduce(x,y,size:int) =
  if x == -1:
    for i in 0..<size:
      putchar_unlocked(S[i])
    return
  for i in 0..<x:
    putchar_unlocked(S[i])
  block:
    var carry = 1
    for i in y.countdown(x):
      let c = S[i].ord - '0'.ord
      let d = c + carry
      if d < 10 :
        S[i] = "0123456789"[d]
        carry = 0
      else:
        S[i] = '0'
        carry = 1
    if carry == 1: putchar_unlocked('1')
  for i in x..<size:
    putchar_unlocked(S[i])
proc impl() =
  var i = 0
  var x = -1
  var y = -1
  var preIsAlpha = true
  while true:
    let k = getchar_unlocked()
    if k.ord < 32 or k.ord > 126 :
      reduce(x,y,i)
      putchar_unlocked('\n')
      return
    let isAlpha = k < '0' or '9' < k
    if not isAlpha:
      y = i
      if preIsAlpha : x = i
    S[i] = k
    i += 1
    preIsAlpha = isAlpha

scan().times: impl()
0