nasa火星车:请用QBASIC编写 求100以内的质数

来源：百度文库 编辑：高考问答 时间：2024/04/30 05:25:44

QB的语法早忘了，就告诉你算法吧
FOR I=2 TO 100
FOR J=2 TO INT（SQR（I））
IF I MOD J=0 THEN
//如果循环完了就是质数，如果非正常跳出循环就是合数
END IF
NEXT
PRINT I；
NEXT
总体上应该没错的

请用QBASIC编写 求100以内的质数 1． 编写vfp程序完成下面功能：求100以内的质数和。 求100~1000以内的质数 谁知道100以内的质数？ 求foxpro 程序 100以内质数相加的和 编写程序求出1000以内的所有质数 编写程序求出1000以内的所有质数？ 编写一个程序，列出1到1000以内，求59的余后为1的质数。 请采用自定义函数的方法，编写求300以内素数的程序。用FOXPRO 用QBASIC编写：求从10到180之间的所有偶数之和