|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
开发语言
→
『 VB6论坛 』
→ 三个数求最大值的另类算法
我的收件箱(0)
欢迎加入我们,一同切磋技术
用户名:
密 码:
共有
2225
人关注过本帖
标题:
三个数求最大值的另类算法
只看楼主
加入收藏
Benison
等 级:
新手上路
帖 子:92
专家分:0
注 册:2007-6-23
楼主
收藏
问题点数:0 回复次数:9
三个数求最大值的另类算法
我写的关于求三个数中的最大值,用一个循环完成,大家看怎么样?
Private Sub Form_click()
……
While a < b Or a < c
a = b
b = c
Wend
Print a
End Sub
搜索更多相关主题的帖子:
最大值
算法
另类
2007-06-30 15:44
举报帖子
使用道具
赠送鲜花
Joforn
等 级:
贵宾
威 望:
23
帖 子:1242
专家分:122
注 册:2007-1-2
第
2
楼
收藏
得分:0
想法不错,我也写一个:
MaxNum = IIf(a > b,a,b)
MaxNum = IIf(MaxNum > c, MaxNum,c)
MsgBox "最大数为:" & MaxNum
VB QQ群:47715789
2007-06-30 16:58
举报帖子
使用道具
赠送鲜花
Benison
等 级:
新手上路
帖 子:92
专家分:0
注 册:2007-6-23
第
3
楼
收藏
得分:0
谢谢版主观临!!!
[此贴子已经被作者于2007-6-30 17:46:02编辑过]
2007-06-30 17:45
举报帖子
使用道具
赠送鲜花
cike_1111
等 级:
新手上路
帖 子:14
专家分:0
注 册:2007-4-30
第
4
楼
收藏
得分:0
能变通下 写出N个数据比大小 求最大 排序等效果的另类算法么?
2007-07-01 12:28
举报帖子
使用道具
赠送鲜花
wangjiajia
等 级:
新手上路
帖 子:5
专家分:0
注 册:2007-7-1
第
5
楼
收藏
得分:0
楼主的程序 是不是 print a orb or c 都是一样的结果
2007-07-01 14:40
举报帖子
使用道具
赠送鲜花
Benison
等 级:
新手上路
帖 子:92
专家分:0
注 册:2007-6-23
第
6
楼
收藏
得分:0
回复:(wangjiajia)楼主的程序 是不是 print a orb ...
对,应该都是一样的!
2007-07-01 20:17
举报帖子
使用道具
赠送鲜花
Benison
等 级:
新手上路
帖 子:92
专家分:0
注 册:2007-6-23
第
7
楼
收藏
得分:0
以下是引用
cike_1111
在2007-7-1 12:28:18的发言:
能变通下 写出N个数据比大小 求最大 排序等效果的另类算法么?
怎么个另类法?
2007-07-01 20:19
举报帖子
使用道具
赠送鲜花
酒肉弥勒佛
等 级:
新手上路
威 望:
8
帖 子:399
专家分:0
注 册:2006-6-6
第
8
楼
收藏
得分:0
想看看除了一般的,前一个数和后一个数比较,交换位置外,还有什么新算法
编程是为了提高效率,好的程序是因为他的高效;在编程的道路上,永远追逐高效的算法
2007-07-02 14:58
举报帖子
使用道具
赠送鲜花
qushizhi
等 级:
新手上路
帖 子:10
专家分:0
注 册:2007-5-11
第
9
楼
收藏
得分:0
用if....then 应该怎么写
2007-07-02 15:00
举报帖子
使用道具
赠送鲜花
酒肉弥勒佛
等 级:
新手上路
威 望:
8
帖 子:399
专家分:0
注 册:2006-6-6
第
10
楼
收藏
得分:0
if a>b then
max=a
else
max=b
end if
if max< c then
max=c
end if
编程是为了提高效率,好的程序是因为他的高效;在编程的道路上,永远追逐高效的算法
2007-07-02 16:50
举报帖子
使用道具
赠送鲜花
10
1/1页
1
快速回复:
三个数求最大值的另类算法
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.015740 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved