結果
問題 | No.713 素数の和 |
ユーザー |
|
提出日時 | 2018-12-18 02:24:00 |
言語 | Nim (2.2.0) |
結果 |
AC
|
実行時間 | 2 ms / 2,000 ms |
コード長 | 736 bytes |
コンパイル時間 | 3,094 ms |
コンパイル使用メモリ | 70,008 KB |
実行使用メモリ | 6,944 KB |
最終ジャッジ日時 | 2024-07-01 06:00:35 |
合計ジャッジ時間 | 3,505 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 6 |
コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 54) Warning: imported and not used: 'strformat' [UnusedImport] /home/judge/data/code/Main.nim(1, 47) Warning: imported and not used: 'macros' [UnusedImport] /home/judge/data/code/Main.nim(1, 41) Warning: imported and not used: 'sugar' [UnusedImport]
ソースコード
import sequtils,strutils,algorithm,math,sugar,macros,strformatproc getPrimes(n:int):seq[int] = # [2,3,5,...n]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 isPrimes = getIsPrimes(n)result = @[]for i,p in isPrimes:if p : result &= iconst primes = getPrimes(1001)const sumPrimes = primes.foldl(a & (a[^1] + b),@[0])[1..^1]const answers = toSeq(1..1000).mapIt(primes.upperBound(it,cmp)).mapIt(sumPrimes[max(0,it-1)])let n = stdin.readLine().parseInt()-1if n == 0 : echo 0else: echo answers[n]