VerySource

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 691|回复: 3

数组问题,请各位高手帮忙解决下

[复制链接]

1

主题

2

帖子

3.00

积分

新手上路

Rank: 1

积分
3.00
发表于 2020-1-18 08:00:01 | 显示全部楼层 |阅读模式
随机产生10个100以内的态数,编程求出其中的最大值,最小值和平均值,要求设计合理的程序界面
回复

使用道具 举报

0

主题

119

帖子

67.00

积分

新手上路

Rank: 1

积分
67.00
发表于 2020-1-23 16:18:01 | 显示全部楼层
这种问题也来问,我的感觉是楼主要在学校好好学习!不可贪玩荒了学业!
回复

使用道具 举报

0

主题

10

帖子

4.00

积分

新手上路

Rank: 1

积分
4.00
发表于 2020-1-25 20:27:02 | 显示全部楼层
既然问了,就告诉你,我也是从那个不会的阶段过来的,不过,不会下次记得自己可以到网上去查

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim oRandom As New Random
        Dim iNum As Integer = 0
        Dim maxOfArray As Integer = 0
        Dim minOfArray As Integer = 0
        Dim aveOfArray As Double = 0
        Dim sumOfArray As Integer = 0
        Dim array As New List(Of String)
        Dim i As Integer = 0
        For i = 0 To 10
            iNum = oRandom.Next(100)
            sumOfArray = sumOfArray + iNum
            array.Add(iNum.ToString)
            Label1.Text = Label1.Text + iNum.ToString() + "," '显示随即生成的10个数字
        Next
        aveOfArray = sumOfArray / 10
        array.Sort()
        Label2.Text = "最大值" + array(9).ToString() + "最小值" + array(0).ToString() + "平均值" + aveOfArray.ToString()
    End Sub
End Class
回复

使用道具 举报

1

主题

2

帖子

3.00

积分

新手上路

Rank: 1

积分
3.00
 楼主| 发表于 2020-1-29 10:54:01 | 显示全部楼层
呵呵,非常感谢了
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|CopyRight © 2008-2023|verysource.com ( 京ICP备17048824号-1 )

快速回复 返回顶部 返回列表