تور لحظه آخری
امروز : دوشنبه ، 27 اسفند 1403    احادیث و روایات:  پیامبر اکرم (ص):اولین چیزی که از انسانها سؤال می شود، نمازهای پنج گانه است .
سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون شرکت ها

تبلیغات

تبلیغات متنی

خرید پرینتر سه بعدی

سایبان ماشین

اجاره سند در شیراز

armanekasbokar

armanetejarat

Future Innovate Tech

آموزشگاه آرایشگری مردانه شفیع رسالت

پی جو مشاغل برتر شیراز

خرید یخچال خارجی

بانک کتاب

طراحی سایت تهران سایت

irspeedy

درج اگهی ویژه

تعمیرات مک بوک

قیمت فرش

خرید بلیط هواپیما

بلیط اتوبوس پایانه

خرید از چین

خرید از چین

خرید سرور اچ پی ماهان شبکه

خودارزیابی چیست

رزرو هتل خارجی

تولید کننده تخت زیبایی

سی پی کالاف

دوره باریستا فنی حرفه ای

چاکرا

استند تسلیت

کلینیک دندانپزشکی سعادت آباد

پی ال سی زیمنس

دکتر علی پرند فوق تخصص جراحی پلاستیک

تعمیر سرووموتور

تحصیل پزشکی در چین

مجله سلامت و پزشکی

تریلی چادری

خرید یوسی

مهاجرت به استرالیا

ایونا

تعمیرگاه هیوندای

کاشت ابرو با خواب طبیعی

هدایای تبلیغاتی

خرید عسل

صندوق سهامی

تزریق ژل

خرید زعفران مرغوب

تحصیل آنلاین آمریکا

سوالات آیین نامه

سمپاشی سوسک فاضلاب

بهترین دکتر پروتز سینه در تهران

صندلی گیمینگ

دفترچه تبلیغاتی

خرید سی پی

قالیشویی کرج

سررسید 1404

تقویم رومیزی 1404

ویزای توریستی ژاپن

قالیشویی اسلامشهر

قفسه فروشگاهی

چراغ خطی

ابزارهای هوش مصنوعی

آموزش مکالمه عربی

اینتیتر

استابلایزر

خرید لباس

7 little words daily answers

7 little words daily answers

7 little words daily answers

گوشی موبایل اقساطی

ماساژور تفنگی

قیمت ساندویچ پانل

مجوز آژانس مسافرتی

پنجره دوجداره

خرید رنگ نمای ساختمان

ناب مووی

خرید عطر

قرص اسلیم پلاس

nyt mini crossword answers

مشاوره تبلیغاتی رایگان

دانلود فیلم

قیمت ایکس باکس

نمایندگی دوو تهران

مهد کودک

پخش زنده شبکه ورزش

 






آمار وبسایت

 تعداد کل بازدیدها : 1865771663




هواشناسی

نرخ طلا سکه و  ارز

قیمت خودرو

فال حافظ

تعبیر خواب

فال انبیاء

متن قرآن



اضافه به علاقمنديها ارسال اين مطلب به دوستان آرشيو تمام مطالب
archive  refresh

درخواست كمك حل پروزه


واضح آرشیو وب فارسی:سایت ریسک: View Full Version : درخواست كمك حل پروزه fireboy18-04-2006, 12:31 PMبا عرض سلام من دانشجوي رشته كامپيوتر و استادمون يك پروزه داده براي پايان ترم از عزيزان تقاضامندم كه يكي مسئولتش رو به عهده بگيره و حلش كنه و سورس كار رو واسم send کنه با تشکر متن سوال به این شرح است و سوال زیر در کتاب ویزوال بیسیک آقای جعفر نزاد قمی يک شرکت هواپيمايي کوچک قصد دارد سيستم ذخيره بليط را کامپيوتري کند برنامه اي بنويسيد که براي طراحي سيستم ذخيره بليط مراحل زير را انجام دهد (تعداد صندلي 40 مي باشد که شماره 1 تا 20 براي سيگاري ها و21 تا 40 براي غير سيگاري ها در نظر گرفته شود) الف: ابتدا يک آرايه يک بعدي با 40عنصر در نظر بگيرد کليه آن عناصر را خالي کنيد ب: يک عدد را دريافت کرده چنانچه عدد صفر باشد صندلي آن را در بخش سيگاري ها و گرنه صندلي را در بخش غير سيگاري ها در نظر بگيرد ج:با توجه به مقدار در يافتي در بخش سيگاري ها و غير سيگاري ها صندلي به آن تخصيص دهد در صورت پر بودن بخش سيگاري ها از مشتري سوال نمايد که در بخش غير سيگاري ها پذيرفته شود يا خيرو برعکس (در صورت تخصيص صندلي 1 را به شماره صندلي نسبت دهد) د: در صورت پيدا نکردن جا آن را براي پرواز هاي بعدي در نظر بگيرد حداکثر 12 پرواز در رزرو داريم براي حل اين مسئله از آرايه 2 بعدي استفاده کنيد که سطرها نشان دهنده شماره صندلي پرواز و ستونهاي آن شماره پرواز تعيين مي کنند Payman_6218-04-2006, 11:31 PMبا عرض سلام من دانشجوي رشته كامپيوتر و استادمون يك پروزه داده براي پايان ترم از عزيزان تقاضامندم كه يكي مسئولتش رو به عهده بگيره و حلش كنه و سورس كار رو واسم send کنه با تشکر امر ديگه اي نداريد؟ تعارف نكنيدا همه بچه ها در خدمت شمان. fireboy19-04-2006, 03:56 PMيعني هيچ كي حاضر نميشه به من دانشجوي بدبخت كمك كنه Babak_King19-04-2006, 05:16 PMیه کلمه کلیدی بده تا پیداش کنم یه صورته سوال به زبانه انگلیسی fireboy20-04-2006, 01:14 PMببین این یکی مسئله را نمی تونی برنامه اي بنويسيد که يک عدد 20 رقمي صحيح را با عدد 20 رقمي ديگر جمع کند براي اين منظور،هر يک از دو عدد را به صورت رشته اي از ورودي بخوانيدسپس هر کاراکتر را به رقم معادل آن تبديل کرده و در يک عنصر آرايه قرار دهيد و هر رقم را به همين روش در آرايه ذخيره نماييد (هر عدد در يک آرايه. سپس حاصل جمع اين 2 عدد 20 رقمي را محاسبه کرده و در خروجي چاپ کند LOVEMT21-04-2006, 03:47 PMسلام دوستان اگه میشه به من هم کمک کنید من هم دوم دبیرستان رشته کامپوتر هستم من پروژه رو تا یه جا های درست کردم ولی وقتی به فکشن میرسه کار نمیده این لینک مطلب 41972 fireboy22-04-2006, 07:50 PMمثل اينكه بي فايده هست برو بچه هاي p30world حال نمی دن Payman_6222-04-2006, 08:21 PMمثل اينكه بي فايده هست برو بچه هاي p30world حال نمی دن شما برداشت درستي از عملكرد سايت نداري. كاربر ها برنامه هاي مورد نيازشون رو مينويسن و هر جا به مشكل بر خوردن اينجا مطرح ميكنن تا دوستان ديگر راهنمايي كنن. شما هم خودت شروع كن. هر جا به مشكل بر خوردي مطرح كن همه بچه ها كمكت ميكنن. اينو بدون اگه از الآن و سر برنامه هايي به اين سادگي درجا بزني و از ديگران تقاضا كني تا برات بنويسن به هيچ جا نميرسي. fireboy23-04-2006, 11:03 PMشما برداشت درستي از عملكرد سايت نداري. كاربر ها برنامه هاي مورد نيازشون رو مينويسن و هر جا به مشكل بر خوردن اينجا مطرح ميكنن تا دوستان ديگر راهنمايي كنن. شما هم خودت شروع كن. هر جا به مشكل بر خوردي مطرح كن همه بچه ها كمكت ميكنن. اينو بدون اگه از الآن و سر برنامه هايي به اين سادگي درجا بزني و از ديگران تقاضا كني تا برات بنويسن به هيچ جا نميرسي. من اگه ميتونستم كه تاپيك نمي زدم عزيز من من در حد مبتدي هستم fireboy23-04-2006, 11:08 PMببين من منظور از به صورت رشته از ورودي بخوانيد رو نفهميدم من مبتدي هستم لااقل يه خورده راهنمايي در مورد نحوه حل كردنش بدين Payman_6224-04-2006, 12:02 AMرشته رو ميتوني از يه تكس باكس بگيري. يا با inputbox بگيري. inputbox اين جوري كار ميكنه. !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! MARTIN24-04-2006, 12:06 AMببين من منظور از به صورت رشته از ورودي بخوانيد رو نفهميدم من مبتدي هستم لااقل يه خورده راهنمايي در مورد نحوه حل كردنش بدين دو تا متغیر از نوع رشته تعریف میکنی به قسمت تعریف رشته ها تو کتابت مراجعه کن بعد دو تا متغیر و از کاربر میخوای که وارد کنه یعنی اعداد وارد کرده بصورت رشته ای در حافظه ذخیره میشن بعد دو تا ارایه به طول بیست از نوع کارکتر تعریف میکنی بعد مثلا از متغیر اول که عدد اول را در اون وارد کردی از سمت راست یکی یکی بصورت کارکتری ازش جدا میکنی مثلا اولین رقم سمت راست رو بعد از جدا کردن در اولین عنصر ارایه قرار میدی اگه همین جور ادامه بدی رقم بیستم از سمت راست در عنصر بیستم قرار میگیره حالا کاری که باید انجام بدی اینه که کارکتر هایه ذخیره شده در ارایه رو به عدد تبدیل کنی با استفاده از سوییتچ کیس این کارو انجام میدی خوب هر عنصر از ارایه که به عدد تبدیل میکنی باید ضرب در ده به توان شماره اندیس منهایه یک بشه مثلا اگه ارایه دوم بود ضرب در ده به توان یک میشه در رابطه با اندیسم باید توجه کنی اولین عنصر ارایه از صفر شروع میشه یا یک چون اگه از صفر شروع بشه کلا یکم فرق میکنه خوب همه رقما یه ضرب در توان ده شده رو باهم جمع میکنی و عدد اصلی رو میسازی برایه عدد دوم هم این کارو میکنی خوب دیگه حله دیگه چیزی متوجه شدی :blink: farzanehm24-04-2006, 12:59 AMسلام متنه پروژتونو كامل بزارين تا بگم چيكار كنين در ضمن به چه زباني؟؟ fireboy24-04-2006, 06:40 PMسلام متنه پروژتونو كامل بزارين تا بگم چيكار كنين در ضمن به چه زباني؟؟ متن پروژه رو گفتم توي صفحه اوله زبان ويژوال بيسيك fireboy26-04-2006, 10:29 AMمن تا اينجا پيش رفتم Dim x As String Dim y As String x = InputBox("Enter Number", "Enter") y = InputBox("Enter Number", "Enter") Dim a(20) As String Dim b(20) As String درست هست؟ بعد اين دستور سوییتچ کیس رو هنوز نخوندم ميشه يه دستور جايگزين كرد يا براي اين دستور توضيح بدين لطفا راهنمايي بفرماييد Payman_6226-04-2006, 12:43 PMاين كد كاراكترها رو ميريزه تو آرايه. جمع كردنشون بايد به چه روشي باشه. عناصر آرايه بايد با هم جمع شن؟ يعني عضو يك هر دو آرايه با هم جمع شه عضو دوشون با هم جمع شه ... تا عضو 20 ؟ !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! fireboy26-04-2006, 08:09 PMدرسته به همين ترتيب هستش Payman_6227-04-2006, 01:36 AMخوب كار كمي گره ميخوره. اگه جمع دو عنصر بزرگتر از 10 بشه چي؟ شما كه نميتوني بگي جمع 182 با 356 ميشه 4138. (تك تك اعداد جمع شدند و كنار هم قرار گرفتند). پس مجبور ميشي هر دفعه چك كني كه اگر حاصل جمع بزرگتر از 10 شد يكان رو نگه داري و دهگان رو با دو عنصر بعدي جمع كني. fireboy28-04-2006, 12:05 PMمن هنوز به نتيجه نرسيدم fireboy30-04-2006, 10:37 PMبالاخره خودم تونستم اينم جوابش Dim x As Integer Dim a(2, 20) As String Dim b(1, 21) As String For i = 1 To 20 a(1, i) = Mid(Text1.Text, i, 1) a(2, i) = Mid(Text2.Text, i, 1) Next i For i = 20 To 0 Step -1 x = (x + (Val(a(1, i)) + Val(a(2, i)))) 10 b(1, i) = (Val(a(1, i)) + Val(a(2, i)) + x) Mod 10 Text3.Text = Str(b(1, i)) + Text3.Text Next i End Sub Payman_6201-05-2006, 01:09 AMبالاخره خودم تونستم اينم جوابش خواستن توانستن است. سایت ما را در گوگل محبوب کنید با کلیک روی دکمه ای که در سمت چپ این منو با عنوان +1 قرار داده شده شما به این سایت مهر تأیید میزنید و به دوستانتان در صفحه جستجوی گوگل دیدن این سایت را پیشنهاد میکنید که این امر خود باعث افزایش رتبه سایت در گوگل میشود




این صفحه را در گوگل محبوب کنید

[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 312]

bt

اضافه شدن مطلب/حذف مطلب




-


گوناگون

پربازدیدترینها
طراحی وب>


صفحه اول | تمام مطالب | RSS | ارتباط با ما
1390© تمامی حقوق این سایت متعلق به سایت واضح می باشد.
این سایت در ستاد ساماندهی وزارت فرهنگ و ارشاد اسلامی ثبت شده است و پیرو قوانین جمهوری اسلامی ایران می باشد. لطفا در صورت برخورد با مطالب و صفحات خلاف قوانین در سایت آن را به ما اطلاع دهید
پایگاه خبری واضح کاری از شرکت طراحی سایت اینتن