Tinh Tong Giai Thua 1+1/2!+...+1/n!

Công sức đó hen !!!! lol!

Bạn hãy …

[ Full reading ]

VisualBasic Chay Nguoc thoi gian
Dim i As …

[ Full reading ]

Private Sub cmdtinh_Click(Index As Integer)
Dim …

[ Full reading ]

Dim i,tong As Integer
n=Val(Textn.Text)
tong=0
…

[ Full reading ]

Tổng số bài gửi : 1 Join date : 10/03/2011

Private Sub cmdtinh_Click(Index As Integer)
Dim I, GT,N As Integer
Dim KQ As Single
GT = 1
KQ = 0
For I = 1 To N
GT = GT * I
KQ = KQ + 1 / GT
KG = Format(KQ, "##,##.00")
txtketqua = KQ
Next I
End Sud

» Tổng Phần Tử..1+1/2.+..+1/n
» Hãy so sánh quan điểm chỉ đạo chiến lược của Đảng trong giai đoạn 1936-1939 và 1939-1945.