Bilangan Fibonacci Di Vb.Net

Membuat Deretan Angka Fibonacci di Vb.Net

Deret Fibonacci adalah sebuah deret angka yang unik, dimana angka berikutnya merupakan hasil penjumlahan dari dua angka sebelumnya. Misalnya, pada deret angka 1 1 2 3 5 8, angka 2 merupakan hasil penjumlahan dari dua angka sebelumnya yaitu 1 + 1. Begitu pun dengan angka 3 merupakan hasil penjumlahan dari angka 1 + 2, dan angka 5 merupakan hasil penjumlahan dari angka 2 + 3 dan seterusnya. Deret Fibonacci dapat dibuat oleh bahasa pemrograman Visual Basic 6, Visual Basic.Net, C, C++, Java, Javascript, PHP dan bahasa pemrograman lainnya.

pembuatan Deret Fibonacci dengan VB.Net saya telah membuatnya dalam sebuah console vb.net ,sekarang anda coba buat project baru,kemudian start application type nya pilih Console application seperti pada gambar berikut ini :

 di Form_load silakan anda tambahkan Kode berikut ini :

Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim prima As Boolean

        Dim i As Integer

        Dim j As Integer

        For i = 2 To 10

            prima = True

            For j = 2 To (i \ 2)

                If (i Mod j) = 0 Then

                    prima = False

                End If

            Next

            If prima = True Then

                System.Console.WriteLine(i)

            End If

        Next

End Sub 

Silakan anda jalankan dengan cara tekan F5 ,maka hasilnya akan muncul angka Berikut ini :

 2 3 5 7

Sekian dan semoga Bermanfaat.