分组后取N条记录

CREATE CURSOR tt (班级 c(10),学号 c(10),成绩 n(3)) INSERT INTO tt VALUES ("01","X0101",86) INSERT INTO tt VALUES ("01","X0102",92) INSERT INTO tt VALUES ("01","X0103",72) INSERT INTO tt VALUES ("01","X0104",86) INSERT INTO tt VALUES ("02","X0201",75) INSERT INTO tt VALUES ("02","X0202",81) INSE...

孪生素数对

clear a=3 b=a ?"孪生素数对:" for i=3 to 100 step 2 x=0 for j=2 to i-1 if i/j=int(i/j) x=1 endif endfor if x=0 a=i if a-b=2 ?b,a endif b=a endif endfor
算法 | 2017-09-05 13:36 | 阅读 608 次 | 评论 0 条
浏览236164次
最新评论
  • cstdio:ooooooo
  • sdta:从VFP入手也不错
  • yuanhouwen:尊敬的sdta大神:作为一个编程外行,看到你关于操控EXCEL的编程程序我觉得特别神奇,想向你...