vb程序设计
现用电压表测得一组电压值:7.3,5.6,6.2,6.3,6.9,5.8,6.4,7.9,6.1。这个电压的理论值为6.4,误差范围20%。现在我需要编写一段vb程序,取一个大概的电压值,将其与理论值比较。对这个问题我这样构思:先剔除误差范围之外的几个数据,再将剩下的求平均值,即为我所要的电压值。那么这么一段程序该如何汇编呢? --------------------编程问答--------------------Dim a(1 To 9) As Double--------------------编程问答--------------------
'数组赋值
'a(1)=7.3
'....
'a(9)=6.9
Dim n As Integer '计数
Dim sum As Double '求和
n = 0
sum = 0
For i = 1 To 9
If Abs(a(i) - 6.4) <= 0.2 Then
sum = sum + a(i)
n = n + 1
End If
Next i
If n > 0 Then
MsgBox "电压值是:" & sum / n
End If
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication1
{
class Program
{
static void Main(string[] args)
{
List<double> list = new List<double>() { 7.3, 5.6, 6.2, 6.3, 6.9, 5.8, 6.4, 7.9, 6.1 };
var avg = (from x in list where x > 6.4 * 0.8 && x < 6.4 * 1.2 select x).Average();
Console.WriteLine(Math.Round(avg, 3));
}
}
}
6.325
补充:VB , 基础类