結果

問題 No.1335 1337
ユーザー Yuzu Mashiro
提出日時 2021-09-28 07:57:25
言語 Nim
(2.2.0)
結果
AC  
実行時間 2 ms / 2,000 ms
コード長 483 bytes
コンパイル時間 3,895 ms
コンパイル使用メモリ 64,064 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-07-07 06:45:17
合計ジャッジ時間 4,580 ms
ジャッジサーバーID
(参考情報)
judge3 / judge1
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 4
other AC * 14
権限があれば一括ダウンロードができます

ソースコード

diff #

#region ccfuncs
import strutils

type
    TypeInt = typedesc[int]
    TypeString = typedesc[string]

proc read(a: TypeString): string {.used.} =
    stdin.readLine

proc read(a: TypeInt, b: TypeInt): (int, int) {.used.} =
    let data = read(string).split
    (data[0].parseInt, data[1].parseInt)

proc answer(n: int) {.used.} =
    echo n
#endregion

let a = read(string)
let s = read(string)

for e in s: stdout.write:
    if isDigit(e): a[parseInt($e)] else: e

stdout.write "\n"
0