标题:计算问题
取消只看楼主
kombel
Rank: 2
等 级:论坛游民
帖 子:69
专家分:48
注 册:2011-6-15
结帖率:92.31%
已结贴  问题点数:20 回复次数:3 
计算问题
我想从10到99中 和值为10的显示出来  例28 2+8=10     再得出10到99中有几个数和值为10的
下面是我写的一段代码 怎么显示不了啊
程序代码:
<%dim sum
sum=0
for i=1to 99
j=mid((i),1,1)
k=mid((i),2,1)
a=","

if j+k=10 then


response.Write(j&k&a)

end if
next
%>

2011-07-08 15:59
kombel
Rank: 2
等 级:论坛游民
帖 子:69
专家分:48
注 册:2011-6-15
得分:0 
回复 2楼 dzt0001
能解释一下这段是什么意思吗
int(i/10)+(i mod 10)=10 
2011-07-08 16:47
kombel
Rank: 2
等 级:论坛游民
帖 子:69
专家分:48
注 册:2011-6-15
得分:0 
回复 4楼 dzt0001
要得到百位上的数  也是不是依此类推啊
2011-07-09 09:39
kombel
Rank: 2
等 级:论坛游民
帖 子:69
专家分:48
注 册:2011-6-15
得分:0 
回复 6楼 dzt0001
程序代码:
<%
count=0

for i=1to 99999
if int(i/10000)+int(i/1000)+int(i/100)+int(i/10)+(i mod 10)=25 then
    Response.Write (i & "<br />")
    count=count+1
end if
next

Response.Write ("数目:"&count)
%> 
我这样改了一下  怎么结果这样子的呢??  
结果:
159
168
177
186
195
203
212
221
230
数目:9
2011-07-09 10:16



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




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

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