Visual Basic 1'den N'e Kadar Asal Sayıları Bulma Örneği

219 Okunma Visual Basic

"Visual Basic" Programlama dilinde "1'den N'e Kadar Asal Sayıları Üretme Örneği" ile ilgili kod örneği aşağıda belirtilmiştir. 

Imports System

Module MainModule
    Sub Main()
        Console.WriteLine("Aralık Değeri Girin: ")
        Dim number As Integer = Convert.ToInt32(Console.ReadLine())

        For num As Integer = 2 To number
            Dim isPrime As Boolean = True
            For i As Integer = 2 To num / 2
                If num Mod i = 0 Then
                    isPrime = False
                    Exit For
                End If
            Next

            If isPrime Then
                Console.WriteLine(num)
            End If
        Next
    End Sub
End Module
Asal Sayı Örnek Bulma Gösterme Visual Basic

İlginizi Çekebilir

Visual Basic String LastIndexOf Kullanımı

Visual Basic Bir Stringten İlk N Karakteri Kaldırma Örneği

Visual Basic Dictionary Key Value Değerlerini Ters Çevirmek

Visual Basic Stringi Byte Dizisine Çevirmek

Visual Basic Sayıların Geometrik Ortalamasını Bulma Örneği