تابعی برای توان

[amin a.^2]

بچه هاي فعال انجمن دلفي سلام
من يه تابع مي خوام براي توان اعداد در دلفي اين پرسشا من ماه پيش هم پرسيده بودم ولي جز سولجر كسي محلم نذاشت سولجر تابع اس اچ ال را به من داد و خودشم گفت كه اشكال داره اما اشكالش خيلي بزرگه
(فقط باش ميشه توان هاي 2 را بدست اورد) حالا هر كسي در اين مورد چيزي مي دونه بگه چون خيلي نياز دارمك
فكر كنم به اندازه ي كافي توضيح دادم

[مرد مباح]

بابا
يك پروسيجر ساده بنويس و خلاص.
كدشو زير نوشتم.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

امتحان كن و خبرشو بده.
موفق باشي.

[soldier]

سلام
اينطوري كه سرعت برنامه مياد پايين!
من مي گردم اگر چيز بهتري پيدا كردم ميزارم!
موفق باشيد ! باي!

[مرد مباح]

اصلا پايين نمياد.
اين سريعترين و مطمئن ترين راه براي اين محاسبس.
امتحانش كن.
خيلي سريع كار ميكنه.
از لحاظ الگوريتمي چيز بهتر از اين تا حالا نديدم.
قاعدتا خود اس اچ ال هم از همين روند استفاده ميكنه.

موفق باشيد.

[NoneForce]

سلام
از اونجا كه غربي ها هم بعضي وقتها از اين توابع پيچيده استفاده مي كنند پس خود بورلند اين تابع را ايجاد كرده است :

تابع توان :

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

بايد Math را به Uses اضافه كنيد.

سورس :

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

مي تونيد يه نگاهي به Math.pas كه در Borland\Delphi6\Source\Rtl\Common قرار دارد بيندازيد.

[AbbasGholami]

فرض کن میخواهی مقدار a به توان b را به دست بیاوری. فقط با یک خط این کار را انجام بده. به صورت زیر:

exp(b*ln(a))

به موقعیت پرانتزها توجه کن.

[soldier]

سلام
ويرايش شد :

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

لطفآ بزاریدش توی کد
بای

[amin a.^2]

عباس جان از شما درسته ولی یه اروری میده
[Error] Unit1.pas(53): Incompatible types
اشکال از نوع متغیرهاست لطفاً بگین اون متغیر باید از چه نوعی باشه
مرد مباح دست شما درد نکنه ولی راه حل شما خیلی طولانیه

[soldier]

راه حل شما خیلی طولانیه

اين رو ميگي طولاني ؟
من يه پروژه ساختم! يك قسمت تبديل .... هست.
اگر ببينيش . قول 100% ميدم كه بي هوش مي شي
تقريبآ 85 خط فقط براي تبديل ... اونوقت فقط تبديل بقيه اش خوب ديگه خدا ميدونه
در ضمن طولاني بودن دليل نيست كه بدرد نخوره . بايد به پروسيجر هاي طولاني هم عادت كني
باي

[amin a.^2]

اين رو ميگي طولاني ؟
من يه پروژه ساختم! يك قسمت تبديل .... هست.
اگر ببينيش . قول 100% ميدم كه بي هوش مي شي
تقريبآ 85 خط فقط براي تبديل ... اونوقت فقط تبديل بقيه اش خوب ديگه خدا ميدونه
در ضمن طولاني بودن دليل نيست كه بدرد نخوره . بايد به پروسيجر هاي طولاني هم عادت كني
باي

سولجر جان حتماَ اين پروسيجر هاي طولاني ارزش كار شما را داره اما براي اين برنامه
من تلاش مي كنم از الگوريتم ها وتابع هاي خيلي كوچك استفاده كنم چون هم ارزششا نداره و هم مي خوام
تاپايان مهر تمام بشه