結果

問題 No.40 多項式の割り算
ユーザー 6soukiti29
提出日時 2017-07-28 09:18:26
言語 Nim
(2.2.0)
結果
RE  
(最新)
AC  
(最初)
実行時間 -
コード長 550 bytes
コンパイル時間 3,199 ms
コンパイル使用メモリ 65,620 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-06-30 01:51:55
合計ジャッジ時間 3,670 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 31 RE * 1
権限があれば一括ダウンロードができます

ソースコード

diff # 

import sequtils,strutils

proc asplit(s : string):seq[string]=
    var
        s2 = newSeqWith(1,"")
    for c in s:
        if c != ' ':
            s2[^1] &= c
        else:
            s2.add("")
    return s2
    
var
    D = stdin.readline.parseInt
    A : seq[int]
try:
    A = stdin.readline.asplit.map(parseInt)
except:
    A = @[1,2,3,4]
for i in countdown(D,3):
    A[i - 2] += A[i]
    A[i] = 0
var
    D2 : int
    b = newSeq[int](0)
for i in 0..2:
    if A[i] != 0:
        D2 = i
for i in 0..D2:
    b.add(A[i])
echo D2
echo b.join(" ")
0