Imports System.IO
Imports System.Reflection
Imports System.Linq
Imports System.Xml.Linq
Public Class MainClass
Public Shared Sub Main
Dim doubles = New Double() {1.1, 2.2, 1.3, 4.4, 2.5}
Dim product = doubles.Aggregate(Function(runningProduct, nextFactor) runningProduct * nextFactor)
Console.WriteLine("Total product of all numbers: " & product)
End Sub
End Class
|