Anasayfa » VB.NET Dersler ve Örnekler » VB.NET Faktöriyel Hesaplama

VB.NET Faktöriyel Hesaplama

Örneğimizde klavyeden girilen bir sayının faktöriyelini bulacağız. Mesela 4 sayısının faktöriyeli matematikte şu şekilde bulunur:

4*3*2*1=24

4 sayısının faktöriyeli 24’tür. Buna göre programımızda 1 den klavyeden girilen sayıya kadar bir döngü oluşturacağız. Ve döngü değeri ile çarpım değerini her defasında yeniden çarpacağız. Kodumuz şu şekilde olacak:

Public Class Form1
Private Sub cmdsayigir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdsayigir.Click
Dim i, sayi, fak As Integer
fak = 1
sayi = InputBox("Faktöriyeli bulunacak sayıyı girin")
For i = 1 To sayi
fak = fak * i
Next i
MsgBox(sayi & " sayısının faktöriyeli = " & fak)
End Sub
End Class

Cevapla

E-posta adresiniz yayınlanmayacak. Gerekli alanlar işaretlenmelidir *

*