結果

問題 No.1335 1337
ユーザー Yuzu MashiroYuzu Mashiro
提出日時 2021-09-28 07:57:25
言語 Nim
(2.0.2)
結果
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
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 2 ms
5,248 KB
testcase_01 AC 1 ms
5,376 KB
testcase_02 AC 1 ms
5,376 KB
testcase_03 AC 1 ms
5,376 KB
testcase_04 AC 2 ms
5,376 KB
testcase_05 AC 0 ms
5,376 KB
testcase_06 AC 1 ms
5,376 KB
testcase_07 AC 1 ms
5,376 KB
testcase_08 AC 1 ms
5,376 KB
testcase_09 AC 1 ms
5,376 KB
testcase_10 AC 1 ms
5,376 KB
testcase_11 AC 1 ms
5,376 KB
testcase_12 AC 1 ms
5,376 KB
testcase_13 AC 1 ms
5,376 KB
testcase_14 AC 1 ms
5,376 KB
testcase_15 AC 1 ms
5,376 KB
testcase_16 AC 1 ms
5,376 KB
testcase_17 AC 1 ms
5,376 KB
権限があれば一括ダウンロードができます

ソースコード

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