扫一扫,加我们为好友有惊喜哦~
-->

核心课程
开班动态
专题服务

您当前所在位置:首页 > 中心动态 >>
二级VFP基础训练——常州电脑培训

1、打印1~100之间的奇数
clear
 
  i = 1
  do while i <= 100
     if i % 2 != 0
         ?i
     endif
    
     i = i + 1
  enddo

return

2、打印1~100之间偶数和
clear
 
  i = 1
  s = 0
  do while i <= 100
     if i % 2 = 0
         s = s + i
     endif
    
     i = i + 1
  enddo
 
  ?"1~100之间偶数和为:",s

return

3、判断一个数是否为素数
clear
 
  input "请输入一个数" to x
 
  i = 2
  f = 1
 
  do while i < x
    if mod(x,i) = 0
      *如果该数能被2~x之间的数整出,则该数不是素数
      f = 0
      exit
    endif
   
    i = i + 1
  enddo
 
 
  if f = 0
    ?"这个数不是素数"
  else
    ?"该数是素数"
  endif
 
 
return

更多精彩:常州cad培训常州电脑培训


精彩文章推荐
经典韩风网站(二)——常州电脑培训[2012-6-26]
时尚风网页设计—常州平面设计培训[2012-6-21]
常州软件培训——内部类与匿名类的写法[2012-6-15]
常州电脑培训——什么是高质量的软件[2012-6-12]
常州电脑培训|维护ASP应用程序的安全[2011-11-23]
常州计算机培训--计算机常用知识汇总(二)[2011-10-20]
电脑培训-忘记用户登陆密码怎么办?[2011-10-17]
[常州电脑培训]五个技巧教你制作个性表单[2011-9-29]


返回顶部