結果

問題 No.539 インクリメント
コンテスト
ユーザー むらため
提出日時 2019-01-26 14:47:07
言語 Nim
(2.2.6)
結果
AC  
実行時間 24 ms / 2,000 ms
コード長 1,356 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 2,101 ms
コンパイル使用メモリ 61,004 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-07-01 10:55:03
合計ジャッジ時間 2,959 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 1
other AC * 3
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

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 scanf(formatstr: cstring){.header: "<stdio.h>", varargs.}
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() =
  scanf("%[^\n]",addr S)
  discard getchar_unlocked()
  var i = 0
  var x = -1
  var y = -1
  var preIsAlpha = true
  for i,k in S:
    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
    preIsAlpha = isAlpha

scan().times: impl()
0