فلوچارت مغلوب اعداد

[amir_te01]

سلام بر دوستان عزیز
میخاستم ببینم کسی میتونه کمکم کنه یه فلوچارت بگشیم که
یک عدد را خونده و بگه چند رقمیه و مغلوب (برعکس) اون را چاپ کنه؟

[knight-rak]

دوست عزیز این که کار خیلی سختی نیست
شما اول باید عدد رو برای اینکه تشخیص بدین چند رقمی هست از تابع len استفاده کنید
بعدش هم کافیه اون عدد رو تقسیم صحیح بر 10 کنید بعد دوباره همون عدد رو باقی مونده 10 رو بگیرید ( x mod 10 )
حالا اگر دقت کنید دوتا رقم اون عدد بدست اومده
البته این برای 2 رقمی بود برای 3 رقمی باید به باقی مونده یکی دیگه اضافه کنید که برای 10 باشه
اینم یه نمونه کوچیک از چیزایی که بالا گفتم :


x = 123
digit = Len(x)
a = x \ 100
b = Left((x Mod 100), 1)
c = x Mod 10
print digit
Print cStr(c) + cStr(b) + cStr(a)

البته این فقط یکی از روش هاش هستش برای فلوچارت هم میتونی از همین استفاده کنی دیگه فلوچارتش کاری نداره
موفق باشید ....

[majjjj]

نیازی به دونستن تعدادارقام نیست فقط کافیه خارج قسمت رو بر 10 تقسیم کنی

[amir_te01]

ضمن تشکر از دوستان
تا اونجاش را کشیدم که بگه چند رقمیه ...
ملی درست متوجه نشدم واسه مغلوبش باید چیکار کرد...
اگه میشه یه کم بیشتر توضیح بدین...
در ضمن میخوام مجموع ارقام عدد را نیز چاپ کنه....
ممنون

[knight-rak]

نیازی به دونستن تعدادارقام نیست فقط کافیه خارج قسمت رو بر 10 تقسیم کنی

خودشون گفتن میخوان تعداد ارقام رو بدست بیارن .

-------------
ببین این یه قانون کلی ریاضی هست شما یه عدد رو کافیه تقسیم به 10 کنید اونوقت باقی مونده رو کنار خارج قسمت بزارید میبینید که میشه همون عدد

موفق باشید ....

[quiet_programmer]

با سلام برای دونستن تعداد ارقام یک عدد بهتره اون عدد رو به رشته تبدیل کنی و بعد با استفاده از تایع len تعداد ارقام رو بدست بیاری. ولی اگه میخوای مجموع ارقام یک عدد رو بدست بیاری و همچنین تعداد ارقام و همچنین مغلوب عدد، میتونی از کد زیر استفاده کنی.


Dim Sum As Integer
Dim Number As Integer
Dim Digit As Integer
Number=Val(Me.TxtNumber.Text)
Sum=0
Digit=0
while (Number<>0)
Sum=Sum+Number mod 10
print Number mod 10
Number=Number \ 10
Digit=Digit+1
wend


همونطور که مشاهده میکنین نیازی به دونستن تعداد ارقام عدد نیست

[knight-rak]

سلام
دوست عزیز منم نگفتم که برای بدست آوردن مغلوب نیازی به تعداد ارقام هست اگر به سوالشون دقت کنید میبینید که گفتن میخوان تعداد ارقام ورودی هم نمایش بدن جدا از بدست آوردن مغلوب

موفق باشید ....