| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2194 人关注过本帖
标题:为何不能将求出的“100-999间所有水仙花数”填入表中?
取消只看楼主 加入收藏
zqall11
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2013-4-26
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:6 
为何不能将求出的“100-999间所有水仙花数”填入表中?
题目要求:将求出的“100-999间所有水仙花数”填入表b02中,b02中只有一个“水仙花数”字段
我写的这个代码感觉是对的,为何几个水仙花数的值加不进表里去,已经用了append blank?求解答,谢谢!
set talk off
clear
USE B02
 P=1
do while not eof()
  GO P   
   I=100
   DO WHILE I<=999
   A=INT(I/100)
   B=INT((I-100*A)/10)
   C=I-INT(I/10)*10
   IF I=A^3+B^3+C^3  
      append blank
      REPL 水仙花数 WITH I
   ENDIF
   I=I+1   
  ENDDO
   P=P+1
 enddo
SET TALK ON
RETURN
搜索更多相关主题的帖子: blank 水仙花 
2013-04-26 10:25
zqall11
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2013-4-26
收藏
得分:0 
回复 2楼 sdta
我这个VFP软件没有可安装的帮助文件,我才学,所以不太懂
2013-04-26 10:43
zqall11
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2013-4-26
收藏
得分:0 
回复 2楼 sdta
VFP的帮助文件在哪里?是软件的帮助部分吗?我打开是英文的,还是MSDN?
2013-04-26 10:49
zqall11
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2013-4-26
收藏
得分:0 
下到了,呵呵,谢谢,不过,这一题能先给我解答清楚么
2013-04-26 11:15
zqall11
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2013-4-26
收藏
得分:0 
已经明白了,表如果有记录,可以用定位指针修改记录,如果是空表,只能一个一个用append blank添加记录,不能用指针,谢谢你们
2013-04-26 11:24
zqall11
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2013-4-26
收藏
得分:0 
set talk off
clear
use b01
COPY TO B02
USE B02   
   I=100
   DO WHILE I<=999
   A=INT(I/100)
   B=INT((I-100*A)/10)
   C=I-INT(I/10)*10
   IF I=A^3+B^3+C^3  
     ?I
      append blank
      REPL 水仙花数 WITH I
   ENDIF
   I=I+1   
  enddo
SET TALK ON
RETURN
我现在去掉那些,这样就可以执行回来了
2013-04-26 11:44
zqall11
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2013-4-26
收藏
得分:0 
以下是引用wengjl在2013-4-26 13:01:35的发言:

什么叫“水仙花数”?
水仙花数就是指一个三位数,其各位数字的立方和等于该数本身,比如:153=1^3+5^+3^3
2013-04-26 14:47
快速回复:为何不能将求出的“100-999间所有水仙花数”填入表中?
数据加载中...
 
   



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

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