标题:求助,有段程序看不懂
取消只看楼主
xiaoqing2014
Rank: 1
来 自:浙江杭州
等 级:新手上路
帖 子:17
专家分:0
注 册:2014-3-7
结帖率:100%
 问题点数:0 回复次数:2 
求助,有段程序看不懂
从10到19这10个数的完全平方数中筛选出各位互补相同的完全平方数,并将结果打印在屏幕上
FOR X=10 TO 19
Y=X*X
DO WHILE Y>0
W=Y MOD 10
IF A(W)=1 THEN EXIT DO
A(W)=1:Y=Y\10:LOOP
IF Y=0 THEN PRINT X*X
ERASE A
NEXT X
END
谁能帮帮我,中间那段循环我看不懂
2014-04-27 22:57
xiaoqing2014
Rank: 1
来 自:浙江杭州
等 级:新手上路
帖 子:17
专家分:0
注 册:2014-3-7
得分:0 
回复 楼主 xiaoqing2014
不好意思,是我打错了,不是互补相同,是互不相同
这两天有事,所以没有来!抱歉!没有及时说明!
2014-04-29 13:25
xiaoqing2014
Rank: 1
来 自:浙江杭州
等 级:新手上路
帖 子:17
专家分:0
注 册:2014-3-7
得分:0 
回复 3 楼 风吹过 b
这是一道题目,我看不懂,所以求助了
我把互不相同打成了互补相同,不好意思!
谢谢你的解析,我看懂了!
2014-04-29 13:28



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-430745-1-1.html




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

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