PDA

View Full Version : تبدیل رشته حرفی به عدد؟



ashki
سه شنبه 27 اردیبهشت 1384, 17:36 عصر
سلام دوستان برای من یک مشکل پیش آمده است
اگر ممکن است راهنمایی بفرمایید
من می خواهم یک کلمه را به عدد تبدیل کنم
مثلا Reza ==> 1478
عددش مهم نیست فقط به یه عددی تبدیل بشه کافی است
که بتوانم محاسباتی روش انجام بدهم
مرسی

javidtaheri
سه شنبه 27 اردیبهشت 1384, 18:19 عصر
کد اسکی آنها را باهم جمع کن ord(R) = :flower:
البته کاری که میخوای بکنی را توضیح بده شاید راه حل بهتری باشد :strange:

ashki
سه شنبه 27 اردیبهشت 1384, 21:04 عصر
میشه بگید چطور به کد اسکی تبدیل می کنند؟
کارم هم وقتی درست شد می گم
یک نسخشم برای شما می فرستم اگر کمکم کنید
برنامه کاربردی هست

مرسی

V60
چهارشنبه 28 اردیبهشت 1384, 01:32 صبح
q:=ord(s[i])
که دراینجا متغیر s همان رشته شما است و متغیر i نشان دهنده چندمین کاراکتر می باشد و متغیر q از نوع عددی می باشد که کد اسکی را دریافت می کند و برای تبدیل دوباره آن به همان حرف از این کد استفاده کن[code]a4:=Chr(byte(l)); که در اینجا متغیر l همان عدد است و متغیر a4 همان متغیر از جنس char می باشد که حرف را در خود نگه می دارد
نگفتی ناقلا می خواهی چی کنی :sunglass:
ولی به نظر من اینجا بنویسی ضرر نمی کنی چون ممکن است یکی قبلا این کار را انجام داه باشد و به دردت بخورد.

V60
چهارشنبه 28 اردیبهشت 1384, 01:33 صبح
خط دوم کد به هم ریخته این شلکی بوده( دقیقا منظور این شلکی می باشد!!!!!)

a4:=Chr(byte(l));

ashki
چهارشنبه 28 اردیبهشت 1384, 15:53 عصر
از کمک شما ممنونم
حالا با یک مشکل دیگه بر خورد کردم
من به یک سری اعداد خیلی بزرگ رسیدم که هر کاری
می کنم و هر آرائه ای که معرفی می کنم اخطار می ده و
می گه is not a valid integer value

کمک
من می خواهم این اعداد را مثلا با هم جمع کنم
4856474850474852
65776832651161041081111104011610941328880325054484 843
4851565170667070
535051555448
49

باید از چه متغیری استفاده کنم
مرسی.

ebnsina
چهارشنبه 28 اردیبهشت 1384, 16:32 عصر
یه زمانی توی قدیما برای برنامه نویسی تحت داس یه تابع نوشتم که برای اعداد خیلی بزرگ مثل مال شما اونها رو بصورت رشته میگرفتم وعملیات جمع رو مثل جمع ریاضیاتی خودمون براشون انجام میدادم. یادم تا اعدادی بالغ بر هزاران رقم رو توی یک ثانیه باهم جمع می زد. البته با QBasic نوشته بودم نه با پاسکال !

یاد قدیما بخیر :wink:

احتمالا می خوای توی زمینه Encription انقلاب بپا کنی !! :kaf:

V60
چهارشنبه 28 اردیبهشت 1384, 17:41 عصر
آقای ashki اینقدر حاشیه نرو
اینجا وجای دیگه هم این مطلب را بیان کرده ای
من از همین الان مطمئن هستم که راه را داری اشتباه می ری
برای اینکه کسی فکرت را ندزدد :mrgreen: ( به خیال خودت) یک جوری مسئله را مطرح کن تا بتوان بهت کمک کرد

ashki
چهارشنبه 28 اردیبهشت 1384, 18:02 عصر
چشم یکم بهم زمان بدین
1 یا 2 روز
بعدا همچی رو می گم