برنامه ای که بدون استفاده از عملگر ضرب aرا به توان b برساند

[FX]

سلام.ندیدم تایپیکی که تو اون بشه سوال کرد هر چند خیلی ساده تا پاسخ بگیریم.اگه هست راهنمایی کنید.

سوال من +کمی توضیح مختصر اگه امکان داره
برنامه ای که بدون استفاده از عملگر ضرب aرا به توان b برساند

ممنون

[moz]

tavan=a^b
print tavan

[FX]

نه منظورم این نیست!این که مشخص هستش

[FX]

یکی به من این جوابو داد ظاهرا درسته(برنامه ای بنویسید که دو عدد صحیح مثبت را از ورودی خوانده و با روش جمع، Aرا به توان B برسونه

Private Sub Command1_Click()
A = Val(Text1.Text)
B = Val(Text2.Text)
j = A

For i = 2 To j ^ (B - 1)
A = j + A
Next
Text3.Text = Str(A)
End Sub

[FX]

درست نبود.ممنون که گفتید!
جواب رو پیدا کردم
Dim A As Integer, B As Integer, S As Integer
A = Text1.Text
B = Text2.Text
T = A
S = A
For I = 2 To B
For J = 2 To A
S = S + T
Next J
T = S
Next I
Text3.Text = S

[parasto2010]

سلام دوست عزيز اين سوالت يه جواب راحت داره
ما ميدونيم كه عمل ضرب همان جمع كردن عدد به تعداد عدد دوم است
5^3=3+3+3+3+3