تبلیغات
تبلیغات متنی
دکتر علی پرند فوق تخصص جراحی پلاستیک
طراحی سایت فروشگاهی فروشگاه آنلاین راه‌اندازی کسب‌وکار آنلاین طراحی فروشگاه اینترنتی وبسایت
بهترین دکتر پروتز سینه در تهران
محبوبترینها
بهترین ماساژورهای برقی برای دیسک کمر در بازار ایران
بهترین ماساژورهای برقی برای دیسک کمر در بازار ایران
آفریقای جنوبی چگونه کشوری است؟
بهترین فروشگاه اینترنتی خرید کتاب زبان آلمانی: پیک زبان
با این روش ساده، فروش خود را چند برابر کنید (تست‌شده و 100٪ عملی)
سفر به بالی؛ جزیره‌ای که هرگز فراموش نخواهید کرد!
از بلیط تا تماشا؛ همه چیز درباره جشنواره فجر 1403
دلایل ممنوعیت استفاده از ظروف گیاهی در برخی کشورها
آیا میشود فیستول را عمل نکرد و به خودی خود خوب میشود؟
مزایای آستر مدول الیاف سرامیکی یا زد بلوک
خصوصیات نگین و سنگ های قیمتی از نگاه اسلام
صفحه اول
آرشیو مطالب
ورود/عضویت
هواشناسی
قیمت طلا سکه و ارز
قیمت خودرو
مطالب در سایت شما
تبادل لینک
ارتباط با ما
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
آمار وبسایت
تعداد کل بازدیدها :
1861023153
محاسبه کردن n به توان m در ویژوال بیسیک -
واضح آرشیو وب فارسی:سایت ریسک: محاسبه کردن n به توان m در ویژوال بیسیک anayurdu 12 دي 1388, 12:58سلام بروبکس عزیر !!!! من چنتا سوال برام پیش اومده توش موندم و کمک داره نفسم تموم میشه لطفا کمکم کنید. مساله ها اینن: 3-برنامه ای که n و m را گرفته و با استفاده از ضرب های متوالی n بتوان m را محاصبه کند اینا همش تو VB 6 هستش.... کمک.... the_king 17 دي 1388, 03:03سلام بروبکس عزیر !!!! من چنتا سوال برام پیش اومده توش موندم و کمک داره نفسم تموم میشه لطفا کمکم کنید. مساله ها اینن: 3-برنامه ای که n و m را گرفته و با استفاده از ضرب های متوالی n بتوان m را محاصبه کند اینا همش تو VB 6 هستش.... کمک.... لطفا هر سوال را در تاپیک جداگانه ای مطرح کنید و در عنوان هر تاپیک موضوع سوال و زبان آنرا بنویسید. Private Sub Form_Load() Dim I As Long, M As Long, N As Long, P As Long N = Val(InputBox("Please enter N :")) M = Val(InputBox("Please enter M :")) P = 1 For I = 1 To M P = P * N Next MsgBox "N ^ M = " & CStr(P) End Sub amj2009 20 دي 1388, 08:40لطفا هر سوال را در تاپیک جداگانه ای مطرح کنید و در عنوان هر تاپیک موضوع سوال و زبان آنرا بنویسید. private sub form_load() dim i as long, m as long, n as long, p as long n = val(inputbox("please enter n :")) m = val(inputbox("please enter m :")) p = 1 for i = 1 to m p = p * n next msgbox "n ^ m = " & cstr(p) end sub ولي اين برنامه كه تا يه حد مشخصي بيشتر حساب نمي كنه.منظورم اينه كه كاري كنيد كه رقم هاي بالاتر مثل 2 به توان 10000 رو هم بنويسه.ممنون the_king 20 دي 1388, 14:45ولي اين برنامه كه تا يه حد مشخصي بيشتر حساب نمي كنه.منظورم اينه كه كاري كنيد كه رقم هاي بالاتر مثل 2 به توان 10000 رو هم بنويسه.ممنون کجا بنویسه؟ همچین عدد بزرگی بیش از 3000 رقم داره، نه توی صفحه نمایش جا برای نوشتنش هست و نه قابل خواندنه، حساب کردنش فایده ای نداره. pirmard 21 دي 1388, 10:21ولي اين برنامه كه تا يه حد مشخصي بيشتر حساب نمي كنه.منظورم اينه كه كاري كنيد كه رقم هاي بالاتر مثل 2 به توان 10000 رو هم بنويسه.ممنون ساد ترین راه برای محاسبات اینچنینی (محاسباتی که داده ی مبدا و یا مقصد در غالت دیتا تایپ های زبان موجود نیست) استفاده از آرایه هاست . یعنی اینکه شما اعدادتون رو رقم به رقم توی خونه های آرایه قرار بدین و سپس محاسباتتون رو روی اونا انجام بدین . (کلیت کار همچین چیزیه که اگه ندونین کارتون با چند رقمه و بخاین فضای اشافه نگیرین مجبور میشین از لینکد-لیست و ... استفاده کنین) که اگه بخواین شسته رفته تر کار کنین بهتره ابسترکت داشته باشین به عنوان یه نوع جدید که به اصطلاح اپراتورهای اون ابسترکت رو هم مختص همون بنویسین (انکپسولیشن داشته باشین)
این صفحه را در گوگل محبوب کنید
[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 1534]
-
گوناگون
پربازدیدترینها