تبلیغات
تبلیغات متنی
محبوبترینها
ساقدوش کیست ؟ | وظیفه ساقدوش در مراسم عقد و عروسی چیست ؟
قایق‌سواری تالاب انزلی؛ تجربه‌ای متفاوت با چاشنی تخفیف
چگونه ویزای توریستی فرانسه را بگیریم؟
معرفی و فروش بوته گرافیتی ریخته گری
بهترین بروکر برای معاملات فارکس در سال 2024
تجربه رانندگی با لندکروز در جزیره قشم؛ لوکس‌ترین انتخاب
اکسپرتاپ: 10 شغل پردرآمد برای مهاجران کاری در کانادا
بهترین سایتهای خرید تیک آبی رسمی اینستاگرام در ایران
صفحه اول
آرشیو مطالب
ورود/عضویت
هواشناسی
قیمت طلا سکه و ارز
قیمت خودرو
مطالب در سایت شما
تبادل لینک
ارتباط با ما
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
آمار وبسایت
تعداد کل بازدیدها :
1815656904
محاسبه کردن 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]
[تعداد بازديد از اين مطلب: 1520]
-
گوناگون
پربازدیدترینها