| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 648 人关注过本帖
标题:求助;一道简单的编程题。。。。
只看楼主 加入收藏
c530837027
Rank: 1
等 级:新手上路
帖 子:41
专家分:0
注 册:2011-12-8
结帖率:85.71%
收藏
已结贴  问题点数:10 回复次数:2 
求助;一道简单的编程题。。。。
输入一个数判断其是否为素数??
好像哪编错了????

clear
input"请输入n;" to n
      
   for j=2 to n-1
      f=.t.  
     if n%j=0
     f=.f.
   exit
      endif
   endfor
   if f=.t.
   ?"shishushu"
   else
   ?"bushishushu"
   endif
cance
搜索更多相关主题的帖子: 编程 
2011-12-11 20:44
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:10 
input'输入数值判断是否为素数,请输入大于2的数字:' to SuShuFT

SuShuFT1=.T.
for aa=2 to SuShuFt-1
    if mod(SuShuFT,aa)=0
       SuShuFT1=.F.
       exit
    endif
endfor

if SuShuFT1
   ?'该数【',SuShuFT,'】是素数.'
else
   ?'该数【',SuShuFT,'】不是素数,他能被【',aa,'】整除.'
endif
2011-12-11 20:54
c530837027
Rank: 1
等 级:新手上路
帖 子:41
专家分:0
注 册:2011-12-8
收藏
得分:0 
厉害!!!
2011-12-11 21:08
快速回复:求助;一道简单的编程题。。。。
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.024651 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved