青青草原综合久久大伊人导航_色综合久久天天综合_日日噜噜夜夜狠狠久久丁香五月_热久久这里只有精品

<rt id="cou4o"></rt>

<li id="cou4o"></li>

<center id="cou4o"></center>

<cite id="cou4o"><pre id="cou4o"></pre></cite>

<button id="cou4o"></button>

<rt id="cou4o"><tr id="cou4o"></tr></rt>
<code id="cou4o"><tr id="cou4o"></tr></code>

<rt id="cou4o"><delect id="cou4o"></delect></rt>

<tfoot id="cou4o"></tfoot>

<abbr id="cou4o"><source id="cou4o"></source></abbr>

coreBugZJ

此 blog 已棄。

PRIME1 - SPOJ 2. Prime Generator

版本三終于 AC 了。

LISP SBCL

1

(defconstant +max-size+ 35000)
2

(defvar *prime* (make-array +max-size+ :initial-element t))
3

(defvar *prime-size* 0)
4

5

(defun init-prime()
6

(do
7

((i 2 (1+ i)))
8

((>= i +max-size+))
9

(when (elt *prime* i)
10

(setf (elt *prime* *prime-size*) i)
11

(incf *prime-size*)
12

(do
13

((j (+ i i) (+ j i)))
14

((>= j +max-size+))
15

(setf (elt *prime* j) nil)))))
16

17

(defconstant +max-len+ 100009)
18

(defvar *ans* (make-array +max-len+ :initial-element t))
19

(defvar *ans-size*)
20

21

(defun solve(m n)
22

(when (< m 2) (setf m 2))
23

(when (> m n)
24

(format t "~%")
25

(return-from solve nil))
26

(setf *ans-size* (1+ (- n m)))
27

(dotimes (i *prime-size*)
28

(let* ((p (elt *prime* i))
29

(b (* (floor (/ (1- (+ m p)) p)) p)))
30

(do ((x (if (> b p) b (+ p p)) (+ x p)))
31

((> x n))
32

(setf (elt *ans* (- x m)) nil))))
33

(dotimes (i *ans-size*)
34

(if (elt *ans* i)
35

(format t "~d~%" (+ m i))
36

(setf (elt *ans* i) t)))
37

(format t "~%" ))
38

39

(init-prime)
40

(let ((cnt (parse-integer (read-line)))
41

m n lin)
42

(dotimes (i cnt)
43

(setf lin (read-line))
44

(setf m (parse-integer (subseq lin 0 (position #\Space lin))))
45

(setf n (parse-integer (subseq lin (1+ (position #\Space lin)))))
46

(solve m n)))
47

posted on 2012-02-06 16:06 coreBugZJ 閱讀(370) 評論(0) 編輯收藏引用所屬分類: ACM 、Lisp

只有注冊用戶登錄后才能發表評論。


相關文章: 微軟2014實習生及秋令營技術類職位在線測試 TopCoder SRM 593 DIV2 第三題生成全排列的非回溯方法（TopCoder SRM 591 DIV 2） A* 算法求解八數碼問題，POJ 1077 Eight POJ 1067 取石子游戲 POJ 2068 Nim POJ 2975 Nim POJ 3696 The Luckiest number POJ 3604 Professor Ben EOJ 1117 剩余定理

網站導航: 博客園 IT新聞 BlogJava 博問 Chat2DB 管理

青青草原综合久久大伊人导航_色综合久久天天综合_日日噜噜夜夜狠狠久久丁香五月_热久久这里只有精品

<ins id="pjuwb"></ins>

<blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>

<noscript id="pjuwb"></noscript>

<sup id="pjuwb"><pre id="pjuwb"></pre></sup>

<dd id="pjuwb"></dd>

<abbr id="pjuwb"></abbr>

●精品国产综合乱码久久久久| 亚洲激情影视| 欧美在线三级| 欧美在现视频| 尹人成人综合网| 亚洲国产成人精品女人久久久 | 午夜视频在线观看一区二区| 国产精品一区久久久| 久久久另类综合| 免费不卡在线视频| 一本一本久久a久久精品牛牛影视| 99视频日韩| 国产亚洲成av人在线观看导航| 久久蜜桃精品| 欧美激情aⅴ一区二区三区| 亚洲一区制服诱惑| 久久久久久久综合色一本| 亚洲精品久久| 午夜精品免费| 亚洲三级国产| 欧美一区二区三区精品| 亚洲高清在线| 亚洲永久字幕| 亚洲黄色免费网站| 亚洲一二三四区| 在线亚洲欧美在线综合一区| 亚洲精品久久嫩草网站秘色| 国产人成一区二区三区影院| 欧美激情导航| 国产一区二区高清| 亚洲美女精品成人在线视频| 激情小说亚洲一区| 亚洲一二三四久久| 日韩视频专区| 久久久噜噜噜久噜久久 | 99热在线精品观看| 欧美一级二区| 亚洲一区二区日本| 麻豆精品视频| 久久久午夜视频| 国产精品捆绑调教| 最近中文字幕日韩精品| 精品91免费| 欧美一区二区日韩一区二区| 亚洲一区二区高清视频| 欧美激情一二三区| 欧美国产日韩一二三区| 国产性做久久久久久| 日韩午夜在线观看视频| 亚洲精品五月天| 久久一区二区三区四区| 久久嫩草精品久久久精品一| 国产精品日韩精品欧美在线| 日韩亚洲欧美一区二区三区| 99国产精品久久久久久久久久| 另类天堂视频在线观看| 久久久欧美精品| 国产一区二区久久| 午夜欧美不卡精品aaaaa| 午夜久久福利| 国产精品国产三级国产普通话99| 亚洲精品一区二区在线| 日韩亚洲欧美成人| 欧美激情亚洲另类| 91久久国产自产拍夜夜嗨| 亚洲人成人99网站| 欧美成人激情视频免费观看| 欧美激情久久久| 亚洲欧洲精品一区二区精品久久久| 久久久久久久激情视频| 美女主播一区| 亚洲成色www8888| 你懂的国产精品| 亚洲国产老妈| 亚洲一区国产视频| 国产精品午夜电影| 久久都是精品| 欧美激情国产精品| 一本久久a久久精品亚洲| 欧美日韩视频在线| 亚洲专区在线| 久久综合国产精品| 亚洲肉体裸体xxxx137| 欧美日韩亚洲另类| 午夜宅男欧美| 久久蜜桃av一区精品变态类天堂| 在线欧美日韩精品| 欧美日韩大片| 午夜视频一区二区| 欧美大片免费看| 这里只有精品丝袜| 国产精品日本| 久久综合九色综合欧美就去吻| 亚洲欧洲一区二区三区| 亚洲欧美日韩另类| 在线观看视频免费一区二区三区| 欧美激情片在线观看| 亚洲综合色激情五月| 你懂的网址国产欧美| 在线视频你懂得一区| 国产丝袜美腿一区二区三区| 欧美成人精品h版在线观看| 亚洲性感激情| 亚洲第一视频| 欧美一区免费| 日韩一级黄色片| 国内一区二区三区在线视频| 欧美另类一区二区三区| 欧美亚洲日本网站| 亚洲人成在线影院| 久久久久久一区二区三区| 一区二区高清视频| 在线免费观看日本一区| 国产精品毛片高清在线完整版| 久久欧美中文字幕| 亚洲午夜精品一区二区三区他趣| 欧美成人精品一区二区三区| 欧美一二三区精品| 一区二区三区视频观看| 亚洲国产91精品在线观看| 国产精品一区在线播放| 欧美日韩国产综合视频在线观看| 久久精品中文字幕一区二区三区| 一区二区三区四区五区在线| 欧美激情精品久久久久久久变态 | 99re6这里只有精品视频在线观看| 国产欧美一区二区三区国产幕精品| 欧美连裤袜在线视频| 久久天天躁狠狠躁夜夜av| 欧美亚洲一区| 亚洲伊人伊色伊影伊综合网| 亚洲免费av电影| 亚洲精品国产精品久久清纯直播| 蜜月aⅴ免费一区二区三区| 久久国产精品久久久久久久久久 | 国产综合香蕉五月婷在线| 国产精品毛片a∨一区二区三区| 欧美剧在线免费观看网站| 欧美+亚洲+精品+三区| 久久久久综合一区二区三区| 久久精品91久久久久久再现| 午夜日韩av| 久久福利资源站| 久久精品色图| 久久午夜色播影院免费高清| 久久婷婷蜜乳一本欲蜜臀| 久久一区二区三区四区五区| 久久最新视频| 老司机午夜精品视频| 欧美a级片网| 欧美日韩高清区| 欧美视频在线观看一区二区| 欧美视频日韩视频在线观看| 国产精品高精视频免费| 国产精品日本欧美一区二区三区| 国产精品日韩久久久| 国产性色一区二区| 在线观看欧美精品| 亚洲国产毛片完整版| a91a精品视频在线观看| 亚洲欧美日韩一区| 久久精品免费播放| 欧美韩日一区二区三区| 亚洲国产精品一区二区第四页av | 欧美黄污视频| 一区二区三区福利| 欧美中文字幕不卡| 男人的天堂亚洲| 国产精品video| 韩国三级电影一区二区| 91久久久久久久久久久久久| 亚洲线精品一区二区三区八戒| 欧美中文字幕不卡| 牛牛精品成人免费视频| 日韩视频一区二区三区在线播放 | 亚洲三级电影在线观看| 亚洲一级黄色av| 久久久久久久成人| 欧美日韩一区二区在线观看视频| 国产色产综合色产在线视频| 亚洲精品国精品久久99热| 性欧美xxxx视频在线观看| 免费影视亚洲| 一本一道久久综合狠狠老精东影业| 午夜久久资源| 欧美日韩亚洲网| 伊人久久噜噜噜躁狠狠躁| 亚洲伊人久久综合| 欧美高清视频一区二区三区在线观看| 日韩一区二区电影网| 久久精品一区中文字幕| 欧美日韩免费在线观看| 亚洲第一在线视频| 欧美在线观看视频在线| 日韩午夜电影| 欧美黄免费看| 亚洲第一页自拍| 久久久亚洲一区| 亚洲一级一区| 国产精品国产三级国产aⅴ9色|

<cite id="44u2m"></cite>

<center id="44u2m"></center>

<li id="44u2m"></li>

<li id="44u2m"><source id="44u2m"></source></li>

<rt id="44u2m"><acronym id="44u2m"></acronym></rt>