Visual Basic Bir Sayının Faktöriyelini Bulma Örneği

"Visual Basic" Programlama dilinde "Bir Sayının Faktöriyelini Bulma Örneği" ile ilgili örnek kod aşağıda gösterilmiştir.

Imports System

Module MainModule

  Sub Main(args As String())

    Console.WriteLine("Bir tamsayı giriniz:  ")
    Dim a As Integer = Integer.Parse(Console.ReadLine())
    Dim sonuc As Integer = Faktoriyel(a)
    Console.WriteLine(a & " sayısının faktöriyeli: " & sonuc)
    
  End Sub

  Function Faktoriyel(n As Integer) As Integer
    Dim f As Integer
    If n = 1 Then
      f = 1
    Else
      f = n * Faktoriyel(n-1)
    End If
    Return f
  End Function

End Module



İlginizi Çekebilir

Visual Basic Dictionary'de Bir Anahtarın Varlığını Kontrol Etmek

Visual Basic List'den Eleman Çıkarma

Visual Basic Bir Url'in Son Kısmını Almak

Visual Basic Dictionary Key Value Değerlerini Ters Çevirmek

Visual Basic 1'den 100'e Kadar Asal Sayı Toplam Örneği