面包机怎样做吐司面包:请用QBASIC编写 求100以内的质数
来源:百度文库 编辑:神马品牌网 时间:2024/05/27 21:42:02
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
总体上应该没错的
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
总体上应该没错的