主题:儿子参加一个BASIC培训,有题不会做,请教高手
poilkj001
[专家分:0] 发布于 2010-03-16 22:25:00
1\有一个三位数,若将百位移到个位,其余两位依次向前移一位,得到的新数比原数的两倍还多1,求原数?
2\求出所有满足下列条件的三位数,它除以11所得的商等于它的各位数字的平方和.[em10]
回复列表 (共2个回复)
沙发
liudan319 [专家分:3780] 发布于 2010-03-17 21:00:00
1,
cls
for i=100 to 999
a=i%10
b=i/100
c=i/10%10
if c*100+a*10+b=i*2+1 then
print i
next i
end
2,
cls
for i=100 to 999
a=i%10
b=i/100
c=i/10%10
if i/11=a*a+b*b+c*c then
print i
next i
end
板凳
poilkj001 [专家分:0] 发布于 2010-03-17 21:59:00
谢谢
我来回复