337到351 随机编写带一位小数点的40个数
时间: 2024-01-25 08:03:01 浏览: 20
好的,以下是40个随机数,保留一位小数:
338.5, 341.9, 340.3, 347.7, 341.0, 341.2, 341.6, 345.1, 341.1, 346.2, 341.9, 341.3, 348.7, 342.9, 345.7, 349.0, 341.2, 342.6, 347.1, 347.2, 342.6, 348.7, 347.6, 349.9, 349.7, 348.8, 348.3, 347.5, 340.8, 345.4, 338.7, 347.8, 348.3, 347.8, 342.1, 348.0, 343.8, 343.5, 340.9, 345.6
相关问题
5.4 到6.0之间随机编写带一位小数点的40个数
好的,这是你需要的40个带有一位小数点的随机数:
5.6
5.5
5.9
5.8
5.4
5.7
5.8
5.2
5.9
5.5
5.4
5.7
5.3
5.6
5.1
5.8
5.6
5.2
5.5
5.1
5.7
5.5
5.9
5.4
5.3
5.2
5.9
5.3
5.1
5.4
5.7
5.6
5.8
5.1
5.2
5.9
5.3
5.7
5.6
5.4
5.5
用VB编写,在excel中自动生成9列10行小数点保留两位的随机小数,随机小数要在指定范围内
在Excel中使用Visual Basic (VB) VBA来生成随机小数并设置保留两位小数,可以按照以下步骤操作:
1. 打开VBA编辑器:按Alt + F11快捷键,或者通过“开发者”选项卡中的“Visual Basic”按钮进入。
2. 创建一个新的模块(Module):在左侧窗格中右键选择“插入”,然后选“模块”。
3. 编写VBA代码:
```vb
Sub GenerateRandomNumbers()
Dim rng As Range ' 定义范围对象
Dim i As Long ' 遍历行数
Dim j As Long ' 遍历列数
' 设置随机数生成范围,这里假设A1为起始位置
Set rng = ThisWorkbook.Worksheets("Sheet1").Range("A1:J1")
' 开始遍历
For i = 1 To 10 ' 行数设定为10行
For j = 1 To 9 ' 列数设定为9列
' 使用RND函数生成随机数,乘以范围最大值后四舍五入到小数点后两位
rng.Cells(i, j).Value = Round(Rnd() * (99 - 0) + 0, 2)
Next j
Next i
End Sub
```
4. 运行宏:将上述代码复制到模块窗口,保存后双击该宏名(如“GenerateRandomNumbers”)即可运行,将在A1:J10区域生成九列十行的随机小数,每个数值都保留两位小数。
阅读全文