結果

問題 No.164 ちっちゃくないよ！！
コンテスト
ユーザー yuppe19 😺
提出日時 2015-05-01 11:45:13
言語 Nim
(2.2.0)
結果
CE  
(最新)
AC  
(最初)
実行時間 -
コード長 1,200 bytes
コンパイル時間 1,962 ms
コンパイル使用メモリ 66,212 KB
最終ジャッジ日時 2024-11-14 19:02:32
合計ジャッジ時間 2,575 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge2
このコードへのチャレンジ
（要ログイン）
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。（リジャッジ後のコンパイルエラーは公開されます）
ただし、clay言語の場合は開発者のデバッグのため、公開されます。

コンパイルメッセージ
/home/judge/data/code/Main.nim(17, 18) Error: type mismatch
Expression: <exp
  [1] exp: int

Expected one of (first mismatch at [position]):
[1] proc `<`(x, y: bool): bool
[1] proc `<`(x, y: char): bool
[1] proc `<`(x, y: float): bool
[1] proc `<`(x, y: float32): bool
[1] proc `<`(x, y: int16): bool
[1] proc `<`(x, y: int32): bool
[1] proc `<`(x, y: int8): bool
[1] proc `<`(x, y: pointer): bool
[1] proc `<`(x, y: string): bool
[1] proc `<`(x, y: uint): bool
[1] proc `<`(x, y: uint16): bool
[1] proc `<`(x, y: uint32): bool
[1] proc `<`(x, y: uint64): bool
[1] proc `<`(x, y: uint8): bool
[1] proc `<`[A](s, t: HashSet[A]): bool
[1] proc `<`[Enum: enum](x, y: Enum): bool
[1] proc `<`[T: tuple](x, y: T): bool
[1] proc `<`[T](x, y: ptr T): bool
[1] proc `<`[T](x, y: ref T): bool
[1] proc `<`[T](x, y: set[T]): bool
[2] proc `<`(x, y: int): bool
[2] proc `<`(x, y: int64): bool

ソースコード

diff #
raw source code 

import strutils, sequtils, math, sets

proc `**`*(base: int, exp: int): int64 =
    var base: int64 = base.int64
    var exp:  int64 = exp.int64
    result = int64(1)
    while exp != 0:
        if (exp and 1) != 0:
            result *= base
        exp = exp shr 1
        base *= base

proc mypow64*(base: int, exp: int): int64 =
    var base: int64 = base.int64
    var exp:  int   = exp
    result = 1.int64
    for i in 0.. <exp:
        result *= base

proc mypow*(base: int, exp: int): int =
    var (base, exp) = (base, exp)
    result = 1
    for i in 0.. <exp:
        result *= base

###
const
    mydigits = toSeq('0'..'9') & toSeq('A'..'Z') #echo toSeq(Digits) (ΦωΦ)＜書けない！

var
    n = stdin.readLine.parseInt
    v = newSeq[string](n)
    lag :int64 = int64.high

for i in 0.. <n:
    v[i] = stdin.readLine

for line in v:
    var shinho = 0
    for c in line:
        var p = mydigits.find(c) + 1
        shinho = max(shinho, p)
    var tmp = int64(0)
    for i, c in line:
        var p = mydigits.find(c)
        tmp += mypow64(shinho, (line.len - i - 1)) * p
#        tmp += (shinho ** (line.len - i - 1)) * p # (ΦωΦ)＜無理！
    lag = min(lag, tmp)

echo lag
0