Bir Sayının Faktöriyeli

 
Private Sub Command1_Click()
d = 1
For x = 1 To Text1.Text
d = x * d
Next x
Text2.Text = d
End Sub

Yorum Yapabilmek İçin Üye Girişi Yapmanız Gerekmektedir.

bir sayının faktöriyeli