Question

1-100乘3.14的数值

比如1π=3.14
2π=6.28
3π=9.42
……

Answer 1

按顺序1 to 100
3.14 6.28 9.42 12.56 15.7 18.84 21.98 25.12 28.26 31.4 34.54 37.68 40.82 43.96 47.1 50.24 53.38 56.52 59.66 62.8 65.94 69.08 72.22 75.36 78.5 81.64 84.78 87.92 91.06 94.2 97.34 100.48 103.62 106.76 109.9 113.04 116.18 119.32 122.46 125.6 128.74 131.88 135.02 138.16 141.3 144.44 147.58 150.72 153.86 157 160.14 163.28 166.42 169.56 172.7 175.84 178.98 182.12 185.26 188.4 191.54 194.68 197.82 200.96 204.1 207.24 210.38 213.52 216.66 219.8 222.94 226.08 229.22 232.36 235.5 238.64 241.78 244.92 248.06 251.2 254.34 257.48 260.62 263.76 266.9 270.04 273.18 276.32 279.46 282.6 285.74 288.88 292.02 295.16 298.3 301.44 304.58 307.72 310.86 314

附带一个VB程序
Private Sub Command1_Click()
Dim a(1 To 100) As Single
For i = 1 To 100
a(i) = 3.14 * i
If i Mod 20 = 0 Then
Print
End If
Print a(i);
Next i
For i = 1 To 100
Open "E:/h.txt" For Append Access Write As #1
Print #1, a(i);
Close #1
Next i
End Sub

Private Sub Form_Load()
Form1.Width = 15000
End Sub