結果

問題 No.627 ランダムウォークの軌跡
ユーザー mkanenobu
提出日時 2018-03-19 19:58:29
言語 Nim
(2.2.0)
結果
AC  
実行時間 2 ms / 2,000 ms
コード長 371 bytes
コンパイル時間 2,748 ms
コンパイル使用メモリ 65,152 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-30 04:53:34
合計ジャッジ時間 3,711 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 33
権限があれば一括ダウンロードができます
コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 8) Warning: imported and not used: 'sequtils' [UnusedImport]

ソースコード

diff # 

import sequtils, strutils

var
    t = readLine(stdin).parseInt
    x:seq[int] = @[]

for i in 0..<t:
    x.add(readLine(stdin).parseInt)

proc main():string =
    for j,v in x:
        if j == 0:
            if not (v == 1 or v == -1):
                return "F"
            continue
        if abs(v - x[j - 1]) != 1:
            return "F"
    return "T"

echo main()
0