| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 815 人关注过本帖
标题:非常简单的题目
只看楼主 加入收藏
我是一只菜菜鸟
Rank: 1
等 级:新手上路
帖 子:146
专家分:0
注 册:2007-9-29
收藏
 问题点数:0 回复次数:18 
非常简单的题目
用键盘输入3个数字,按小到大排列,怎么弄

2007-10-16 21:14
我是一只菜菜鸟
Rank: 1
等 级:新手上路
帖 子:146
专家分:0
注 册:2007-9-29
收藏
得分:0 
咋就米人知道捏``

从菜鸟开始````
2007-10-16 21:18
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
收藏
得分:0 

Dim a As Byte,b As Byte,c As Byte
输入a,b,c
If a>b Then
a=a xor b
b=a xor b
a=a xor b
End If
If a>c Then
a=a xor c
c=a xor c
a=a xor c
End If
If b>c Then
b=b xor c
c=b xor c
b=b xor c
End If
Msgbox Trim(Str(a)) & " " & Trim(Str(b)) & " " & Trim(Str(c))
End If

2007-10-16 21:28
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
收藏
得分:0 
非常简单的题目,没错,我就晓得这个答案有人会看不懂。
2007-10-16 21:30
xlin1033xl
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:160
专家分:129
注 册:2007-6-24
收藏
得分:0 

dim x#,y#
x=IIf(a<b,a,b)
y=IIf(b<c,b,c)
a=IIf(x<y,x,y)
x=IIf(a>b,a,b)
y=IIf(b>c,b,c)
b=IIf(x<y,x,y)
c=IIf(x>y,x,y)
Msgbox a & "," & b & "," & c

[此贴子已经被作者于2007-10-17 0:08:58编辑过]


-------------程序*酒*人生
2007-10-17 00:07
静夜思春
Rank: 1
等 级:新手上路
帖 子:137
专家分:0
注 册:2007-7-2
收藏
得分:0 
以下是引用multiple1902在2007-10-16 21:28:09的发言:

Dim a As Byte,b As Byte,c As Byte
输入a,b,c
If a>b Then
a=a xor b
b=a xor b
a=a xor b
End If
If a>c Then
a=a xor c
c=a xor c
a=a xor c
End If
If b>c Then
b=b xor c
c=b xor c
b=b xor c
End If
Msgbox Trim(Str(a)) & " " & Trim(Str(b)) & " " & Trim(Str(c))
End If

加密迭代

2007-10-17 01:18
梦心
Rank: 4
来 自:福建平和
等 级:贵宾
威 望:13
帖 子:1910
专家分:0
注 册:2007-5-11
收藏
得分:0 
大学课本里面排序的例子遍地都是~

我清高和我骄傲的倔强,在风中大声的唱:我不听,我不听~~做我自己最特别,呼呼~~啦啦~~~
我的博客园地址: [url]http://[/url]
2007-10-17 08:23
我是一只菜菜鸟
Rank: 1
等 级:新手上路
帖 子:146
专家分:0
注 册:2007-9-29
收藏
得分:0 
试了下:
3楼的可以
5楼的貌似有点问题
7楼的,你要送我几本我很乐意接受

[此贴子已经被作者于2007-10-17 21:04:09编辑过]


从菜鸟开始````
2007-10-17 19:19
hyhhd
Rank: 2
等 级:论坛游民
威 望:1
帖 子:502
专家分:44
注 册:2006-5-12
收藏
得分:0 
我真不知道,别见笑。排序,怎么会用到加密迭代?

2007-10-17 20:50
静夜思春
Rank: 1
等 级:新手上路
帖 子:137
专家分:0
注 册:2007-7-2
收藏
得分:0 
以下是引用hyhhd在2007-10-17 20:50:04的发言:
我真不知道,别见笑。排序,怎么会用到加密迭代?

你看不懂不就证明是加密了吗?

2007-10-18 21:59
快速回复:非常简单的题目
数据加载中...
 
   



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

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