主题：帮我解决一下题目 谢谢
wgejfnmqj147
[专家分：0] 发布于 2005-05-06 17:00:00
1.一辆以固定速度行驶的汽车,清晨司机看到里程表上从左到右的读数和从右到左的读数是相同,这个数是95859.7小时后,里程表上又出现了个新的对数.问此车的时速是多少(是一个整数)?这个新的对称数是什么?设里程表为5位数字.
2.从张牌中任意抽出3张,有几种排列方法.
3.找出1-100之间的全部同构数.所谓同构数是指这样一个数,它出现在它的平方数的右端.例如,5的平方是25,5是25中右端的数,5就是同构数.25也是一个同构数
4.一个数如果等于其每一个数字立方之和,则此数称为阿姆斯特朗数(Armstrongnumber).如407就是一个阿姆斯特朗数.因为:407=4的立方+0的立方+7的立方.要求输出1-2000之间所有的阿姆斯特朗数.谢谢
回复列表 （共21个回复）
11 楼
qbqb [专家分：400] 发布于 2005-05-07 01:58:00
楼主啊，别人写给你程序你要看一看不要错的也打分，我怀疑你是在抄作业。
12 楼
网中看客 [专家分：0] 发布于 2005-05-07 09:24:00
第三题是不是
for i= ito 100
x=i*i
if i=x-int(x/10)*10 then print i;x
next i
end
13 楼
wgejfnmqj147 [专家分：0] 发布于 2005-05-07 09:34:00
你那个X有什么用啊!!!
14 楼
davidw017 [专家分：4170] 发布于 2005-05-07 14:10:00
10 楼你的程序什么叫 if i < 10 then print i ……
15 楼
davidw017 [专家分：4170] 发布于 2005-05-07 14:19:00
10 楼程序的结果: 1 2 3 4 5 6 7 8 9 12 25, 其中正确的 1 5 6 25, 其他的不对, 自己验算去.
12 楼程序的结果: 0 彻底全错
我看我那个没错
我查了我当年做的练习：答案就是 1, 5, 6, 25, 76 和我程序结果一样
16 楼
网中看客 [专家分：0] 发布于 2005-05-08 12:58:00
发的时候打错了
应该是
for i=1to100
x=i*i
if i=x-int(x/10)*10 then print i;x
next i
end
结果是1 1 5 25 6 36
17 楼
davidw017 [专家分：4170] 发布于 2005-05-08 16:39:00
不对，还有两个解是 25, 625; 76, 5776 你的程序没有打出来？
18 楼
54BB [专家分：380] 发布于 2005-05-09 16:50:00
第六楼的a*a*a为什么写成a^3就不对了？
19 楼
wangxd93 [专家分：0] 发布于 2005-06-19 21:29:00
要求是输出100以内的，所以25、625才没有输出啊～
20 楼
wangxd93 [专家分：0] 发布于 2005-06-19 21:59:00
第二题应该是从7张片中任意抽出三张牌有多少种抽法？公式应该是。M！／（N－M）！
我试着写了一个：请赐教
INPUT "一共有几张牌";M
INPUT "要抽出几张牌";N
A=1
FOR I=1 TO M
A=A*I
NEXT I
B=1
FOR J=1 TO M-N
B=B*J
NEXT J
C=A/B
PRINT C
END
我来回复
您所在位置：