如何统计出数组中相同数字的个数?专家帮我看看这段代码怎么改

brentylw 2008-04-16 02:18:35
<%
dim a(6)
a(0)=1
a(1)=3
a(2)=6
a(3)=3
a(4)=5
a(5)=2
counter=1
for k=0 to ubound(a)-1
for i=0 to Ubound(a)-1
for j=0 to Ubound(a)-1
if strcomp(a(i),a(j))=-1 then
tmp=a(i)
a(i)=a(j)
a(j)=tmp
end if
next
next
response.write a(i)&"  <font color='red'>"
response.write counter
response.write "</font><br>"
next
%>
...全文
70 1 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
EexeNet 2008-04-16
  • 打赏
  • 举报
回复
有点意思,先排序一下再处理应会好些

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧