برنامه ای میخوام که محاسبه زیر را انجام دهد:

[behroz1992]

سلام دوستان برنامه ای میخوام که محاسبه زیر را انجام دهد:

[alireza_s_84]

سلام دوستان برنامه ای میخوام که محاسبه زیر را انجام دهد:
سلام:
دقیقا منظورت چیه؟ یعنی اینکه به این برنامه یک عدد بدیم و اون به ترتیبی که گفتی تا اون عدد محاسبه ش کنه؟

[behroz1992]

دقیقا هم این شکلی که اونجا عکسش است n عدد دریافت کند با حلقه for next
متشکرم

[alireza_s_84]

دقیقا هم این شکلی که اونجا عکسش است n عدد دریافت کند با حلقه for next
متشکرم
فکر کنم منظورت این باشه


Dim No As Integer
Dim Result As Integer
No = 5
Result = 0
For i=1 To No
Result = Result + (i*2)
Next i

[powerboy2988]

بيا اما يكم محدوديت داره....

[ebham33]

سلام
بابا بذار راه سادش رو بگم و تمام

dim a as long
a=inputbox("enter number
sum=0
for i=1 to a
sum=sum+i
sum=sum+i
next i
print sum
--------------------
عزیز اینجا sum خروجی می باشد.