結果
問題 | No.537 ユーザーID |
ユーザー |
|
提出日時 | 2019-01-16 11:34:06 |
言語 | Nim (2.2.0) |
結果 |
CE
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 1,578 bytes |
コンパイル時間 | 982 ms |
コンパイル使用メモリ | 72,956 KB |
最終ジャッジ日時 | 2024-11-14 20:45:38 |
合計ジャッジ時間 | 1,595 ms |
ジャッジサーバーID (参考情報) |
judge5 / judge1 |
(要ログイン)
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。(リジャッジ後のコンパイルエラーは公開されます)
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
コンパイルメッセージ
/home/judge/data/code/Main.nim(29, 28) Error: cannot open file: queues
ソースコード
#[import sequtils,strutils,algorithm,math,sugar,macros,strformatimport sets,tables,intsets,queues,heapqueue,bitopstemplate get*():string = stdin.readLine().strip()macro unpack*(arr: auto,cnt: static[int]): auto =let t = genSym(); result = quote do:(let `t` = `arr`;())for i in 0..<cnt: result[1].add(quote do:`t`[`i`])template times*(n:int,body) = (for _ in 0..<n: body)template `max=`*(x,y) = x = max(x,y)template `min=`*(x,y) = x = min(x,y)proc getIsPrimes(n:int) :seq[bool] = # [0...n] O(n loglog n)result = newSeqWith(n+1,true)result[0] = falseresult[1] = falsefor i in 2..n.float.sqrt.int :if not result[i]: continuefor j in countup(i*2,n,i):result[j] = falselet n = get().parseInt()const isPrimes = getIsPrimes(1e6.int + 10)for i inlet factorCounts = n.getFactorByProcess().toCountTable()let factors = toSeq(factorCounts.values)echo factors.mapIt(it + 1).foldl(a * b,1)]#import sequtils,strutils,algorithm,math,sugar,macros,strformatimport sets,tables,intsets,queues,heapqueue,bitopstemplate get*():string = stdin.readLine().strip()macro unpack*(arr: auto,cnt: static[int]): auto =let t = genSym(); result = quote do:(let `t` = `arr`;())for i in 0..<cnt: result[1].add(quote do:`t`[`i`])template times*(n:int,body) = (for _ in 0..<n: body)template `max=`*(x,y) = x = max(x,y)template `min=`*(x,y) = x = min(x,y)let n = get().parseInt()var results = initSet[string]()for i in 1..n.float.sqrt.int:if n mod i != 0: continueresults.incl $i & $(n div i)results.incl $(n div i) & $iecho results.card