نقل قول: تشخیص بزرگترین عدد
راه حل منطقی دیگه ای به فکرم نمی آد ولی روش فکر می کنم اگه جوابشو گرفتم می گم .
نقل قول: تشخیص بزرگترین عدد
نقل قول:
نوشته شده توسط
ALI TT
حالا سوال من : کسی بلد از این کمتر کد بده به من که برم حالشو بگیرم ، دمتون گرم :قلب:
فکر میکنم تابعی بنام MAX() باشد ولی من اونو توی SQL امتحان کردم نمیدونم توی VBجواب میده یانه
نقل قول: تشخیص بزرگترین عدد
سلام دوست من
نقل قول:
فکر میکنم تابعی بنام MAX() باشد ولی من اونو توی SQL امتحان کردم نمیدونم توی VBجواب میده یانه
نقل قول:
یه آرایه تشخیص دهد . ( بدون استفاده از توابع دیگر ) .
نقل قول: تشخیص بزرگترین عدد
ممنون دوستان
به نظر خودم هم از این سبکتر و بهتر نمیشه !
اولین عدد رو با کوچکترین عدد ممکن (Long.MinValue) مقایسه میکنه و بزرگتر رو نگه میداره ، ( یعنی میده به متغیر use_Long )
بعد دومین عدد رو با مقداری که توی شرط قبلی بزرگتر بود ( use_Long ) مقایسه و بعد اگه بزرگتر از قبلی بود ، قبلی رو ول میکنه و عدد جدیده ( که دومی باشه ) رو میده به use_Long . و همین طور تا آخر ......... در آخر هم مقدار use_Long مسلما بزرگتر از همه است .
برای بدست آوردن کوچکترین عدد هم کافیه :
اینو : Long.MinValue رو بکنی Integer.MaxValue
و علامت > رو بکنی <
در کل :
Dim Array_int As Integer() = {-100, -5, -654, -20}
Dim use_Long As Long = Long.MaxValue
For Each Max As Long In Array_int
If use_Long > Max Then use_Long = Max
Next
MessageBox.Show(use_Long)