Visual Basic Bir Dizi Kullanarak N Sayının Toplamını Bulma Örneği
"Visual Basic" Programlama dilinde "Bir Dizi Kullanarak N Sayının Toplamını Bulma Örneği" ile ilgili kod örneği aşağıda belirtilmiştir.
Module MainModule
Sub Main(args As String())
Console.WriteLine("Kaç tane sayı gireceksiniz: ")
Dim sc As New Scanner(Console.In)
Dim num As Integer = Integer.Parse(sc.nextLine())
Dim numbers(num-1) As Integer
Dim sum As Integer = 0
For n As Integer = 0 To num-1
Console.WriteLine("Sayı giriniz: ")
Dim x As Integer = Integer.Parse(sc.nextLine())
numbers(n) = x
Next
For i As Integer = 0 To numbers.Length-1
sum = sum + numbers(i)
Next
Console.WriteLine("Dizideki tüm elemanların toplamı: " + sum)
End Sub
End Module