网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索

 
 
 
日一二三四五六
       
       
       
       
       
       

签到排名:今日本吧第个签到,

本吧因你更精彩,明天继续来努力!

本吧签到人数:0

一键签到
成为超级会员,使用一键签到
一键签到
本月漏签0次!
0
成为超级会员,赠送8张补签卡
如何使用?
点击日历上漏签日期,即可进行补签。
连续签到:天  累计签到:天
0
超级会员单次开通12个月以上,赠送连续签到卡3张
使用连续签到卡
05月15日漏签0天
vb吧 关注:156,149贴子:1,166,067
  • 看贴

  • 图片

  • 吧主推荐

  • 游戏

  • 4回复贴,共1页
<<返回vb吧
>0< 加载中...

急!哪位大神可以帮我编个程啊···在线等···(比较简单)

  • 只看楼主
  • 收藏

  • 回复
  • LonelyWind
  • 啥也不懂
    1
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
一、实验目的
学会综合运用选择结构、循环结构、数组和过程进行程序设计的方法。
二、实验内容
利用随机函数产生80个10~99之间的随机整数,将其中的奇数按由小到大的顺序排列并输出;在产生的80个随机整数中,找出其中的素数。
三、实验要求
1.将随机产生的80个整数存入数组,按每行10个数输出到窗体或文本框中。
2.奇数也存入另一个数组,将排好序的奇数输出到窗体或文本框中。
3.用Sub子过程或Function函数过程判断随机整数是否为素数。
4.将素数按每行10个数在窗体或文本框中输出。
5.界面和属性由学生自行设计和设置(界面设计要合理、美观,属性设置用表格完成,包括对象名、属性名和属性值)。



  • fv22861735
  • 啥也不懂
    1
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
简单吗?我认为少于200没人接的,保守的估计!


2025-05-15 00:34:47
广告
  • Kita
  • 子类化
    13
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
真的很简单呃...
重点:
冒泡排序法(具体上百度搜,百科里就有现成的代码)
把随机整数存入数组e:
dim e(1 to 80)
for i=1 to 80
e(i)=int(rnd*89+10)
next i
奇数m判断:
if m mod 2 = 1 then m是奇数
素数判断:
function 判断素数$(被判断的数@)'$是字符串(String)类型,@是Currency类型
for i = 2 to 被判断的数-1
if 被判断的数 mod i = 0 then
判断素数=被判断的数&"不是素数"
exit function
end if
next i
判断素数=被判断的数&"是素数"'既然并未能跳出循环,那么它当然是素数
end function


  • 青春的颜色
  • 吧主
    15
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
200RMB,我接了,QQ 374407670


  • LonelyWind
  • 啥也不懂
    1
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
太感谢了…


登录百度账号

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频!
  • 贴吧页面意见反馈
  • 违规贴吧举报反馈通道
  • 贴吧违规信息处理公示
  • 4回复贴,共1页
<<返回vb吧
分享到:
©2025 Baidu贴吧协议|隐私政策|吧主制度|意见反馈|网络谣言警示