作业圈

首页 > 数学

VB 找出1000以内所有质数的算法

admin 2020-01-19 数学
题目:VB 找出1000以内所有质数的算法
答案: Private Sub Command1_Click()
For i = 2 To 1000
For j = 2 To i
If i Mod j = 0 Then Exit For
Next j
If j = i Then Print i;
Next i
End Sub

Tags:质数 算法 以内 找出 

猜你喜欢

  • 01-19 VB题 枚举算法 请计算自然数100以内的能被3整除的偶数的个数.
  • 01-19 阅读下面一首诗歌,完成后面题目。送魏二王昌龄醉别江楼橘柚香,江风引雨入舟凉。忆君遥在潇湘月,愁听清猿梦里长。1.找出诗中点明送别季节的词语。由送别季节可以联想到柳永
  • 01-19 阅读下面一首诗词,回答后面的问题。送魏二王昌龄醉别江楼橘柚香,江风引雨入舟凉。忆君遥在潇湘月,愁听清猿梦里长。(1)王诗前二句中哪个字最能体现离愁,试找出来并作简要
  • 01-19 很久很久以前,地球上发生过一次大旱灾,所有的河流和水井都干涸了,草木丛林也都干枯了,许多人和动物都焦渴而死。1.找出下列词语的反义词。旱灾()干枯()2.请用横线画出能说
  • 01-19 下列说法正确的是[]A.50米B.28天C.能化成有限小数D.假分数的倒数一定是真分数E.3和4是互质数,它们也都是12的质因数F.2倍,高也同时扩大2倍,这个圆柱的体积就扩大4倍
  • 01-19 3,6,4,10三种算法快哈!·还有一组就是11,7 都是整数的
  • 01-18 课文背影中找出文中四次描写我的眼泪的语句,并体会眼泪与父亲背影的联系.
  • 01-18 第十一届全运会在济南召开,这是泉城人的骄傲和自豪,作为东道主,请你写一段话,向来自全国各地的朋友介绍一下济南的风土人情。(字数在60字以内)
  • 01-18 月亮有许多美称与雅号,阅读下面这几首与月亮有关的古代诗歌,找出代表月亮美称与雅号的词语,抄在下面。闽国扬帆去,蟾蜍亏复团。秋风生渭水,落叶满长安。此地聚会夕,当时
  • 01-18 阅读下面的材料,按要求回答问题。(7分)某班拟开展“金钱,让人欢喜让人忧”的综合性学习活动,请你积极参与下列活动。(1)【想想】请你阅读下面的材料,找出共同点,写出结论性的
  • 搜索