📄 2007-11-2-15-20.prg
字号:
rem 求1到100以内的质数
int i,j,p,t
for i=2,100,1
let p=0
for j=i-1,99,1
let t=i%j
jne t,0,xxxx
let p=1
label xxxx
next
label break
print i
next
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -