Function 随机数组(维度 As Integer, 区间起 As Integer, 区间止 As Integer) As Integer()
Dim 数组随机 As IEnumerable(Of Integer) = Enumerable.Range(9, 维度)
数组随机 = 数组随机.Select(Function(aa) New Random(New Random().Next(aa * 区间止)).Next(区间起, 区间止)).ToArray()
Return 数组随机
End Function
Dim 数组 = 随机数组(10, 19, 89)
Dim 最大值 = 数组.Max()
Dim 最小值 = 数组.Min()
Dim 数组和 = 数组.Sum()
Dim 平均值 = 数组.Average()
数组输出弹出(数组)
Function 数组输出弹出(数组 As Integer(), Optional 个数 As Integer = 4, Optional 控制 As Boolean = True) As String
Dim 输出格式 = ""
While (数组.Length >= 个数)
输出格式 += String.Join(" ", 数组.Take(个数)) + IIf(数组.Length < 个数, "", vbCrLf)
数组 = 数组.Skip(个数).ToArray()
If 数组.Length < 个数 Then
输出格式 += String.Join(" ", 数组.Take(数组.Length))
Exit While
End If
End While
If 控制 Then MsgBox(输出格式)
Return 输出格式
End Function
c#
static int[] 随机数组(int 起始, int 终止, int 维度)
{
var 数组 = Enumerable.Range(9, 维度);
数组 = 数组.Select(aa => new Random(new Random().Next(aa * 终止)).Next(起始, 终止));
return 数组.ToArray();
}
var 个人得分 = 随机数组(88, 99, 7);
Console.WriteLine("评委给分:{0}", string.Join(" ", 个人得分));
var 最高分 = 个人得分.Max();
var 最低分 = 个人得分.Min();
var 最后得分 = 个人得分.Where(aa => aa != 最高分 && aa != 最低分).Average();
Console.WriteLine("MMM歌手得分情况:去掉一个最高分{0},去掉一个最低分{1},MMM选手最后得分:{2}", 最高分, 最低分, 最后得分);