题目
用VB语言求1000内的质数之和
提问时间：2021-01-07
答案
Private Sub Form_Click()
For i = 2 To 1000
s1 = 0
For i1 = 1 To i
If i Mod i1 = 0 Then s1 = s1 + 1
Next
If s1 = 2 Then s = s + i
Next
Print s
End Sub
For i = 2 To 1000
s1 = 0
For i1 = 1 To i
If i Mod i1 = 0 Then s1 = s1 + 1
Next
If s1 = 2 Then s = s + i
Next
Print s
End Sub
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1游览桂林山水让你感到你是走进了连绵不断的画卷改为感叹句. 谢谢了!
- 2用5个12厘米,宽为8厘米的长方形,把它拼成一个正方形,该怎样拼,拼成后这位正方形的周长是多少
- 3That was the first time I had been there,and there were three more visitors ___ me.
- 4“加减乘除”怎样用英语表示?怎样读?
- 5I read a story -book yesterday 一般疑问句和否定回答
- 6标准状况下,22.4L盐酸含有Na个HCL分子对不对为什么
- 7sin6°.sin42°.sin66°.sin78°怎么求啊?
- 8研究牛顿第一定律的实验中,相同条件是什么?不同条件是什么?这样
- 9计算：2a÷a/b·b/2a
- 10甲乙两小组计划生产680个零件,生产了798个.甲超过本组计划1/5乙超过3/20,甲乙计化各生产多少?
热门考点
- 1学数学需要什么思维?如何理解"数学思想"?
- 2①干燥的食盐晶体②液态氯化氢③蔗糖④盐酸⑤硝酸钾溶液⑥熔融氯化钾⑦铁 能导电：电解质：非电解质：
- 3生活委员用英语怎么说?
- 4I will be yours forever!
- 5甲容器中有浓度为8%的食盐水300千克，乙容器中有浓度为12.5%的食盐水120千克．往甲、乙两个容器中倒入等量的水，使两个容器中食盐水的浓度相同．应倒入_千克水．
- 6急求关于文明美德伴我成长的作文,1500字的.
- 7一台彩电,原价2496元,现在价格比原来降低了1/8,现在售价多少元?算式结果
- 8甲数12.5,乙数是1.25,如果甲数减去X,乙数加上X,那么甲数还比乙数多3.25,求X
- 9The wind blows strongly hard.
- 10地理条件对韩国经济发展的分布有何影响