إعـــــــلان

تقليص
لا يوجد إعلان حتى الآن.

الأعداد السعيدة

تقليص
هذا الموضوع مغلق.
X
X
 
  • تصفية - فلترة
  • الوقت
  • عرض
إلغاء تحديد الكل
مشاركات جديدة

  • الأعداد السعيدة

    السلام عليكم ورحمة الله وبركاته

    قرأت هذا الموضوع المتعلق بخوارزمية تحديد
    الأعداد السعيدة قلت أكتبه للاستفادة
    قبل ذلك وجبت الاشارة إلى أن الأعداد السعيدة
    هي تلك الأعداد التي يؤول دائما مجموع مربع أرقامها
    إلى العدد 1 في مرحلة أو في عدة مراحل

    مثال : نأخذ العدد 19 هل هو عدد سعيد ؟
    9 مربع = 81
    1 مربع = 1
    مجموع مربعيهما = 82 نواصل
    مربع 2 = 4
    مربع 8 = 64
    مجموع مريعيهما = 68 نواصل
    مربع 8 = 64
    مربع 6 = 36
    مجموعهما = 100 نواصل
    مربع 0 = 0
    مربع0=0
    مربع1=1
    مجموعهم = 1

    اذن : العدد 19 عدد سعيد

    الخوارزمية :
    [html]function digits(n)
    if n > 0 then return n % 10, digits(math.floor(n/10)) end
    end
    function sumsq(a, ...)
    return a and a ^ 2 + sumsq(...) or 0
    end
    local happy = setmetatable({true, false, false, false}, {
    __index = function(self, n)
    self[n] = self[sumsq(digits(n))]
    return self[n]
    end } )
    i, j = 0, 1
    repeat
    i, j = happy[j] and Dialog.Message("Notice", j) or (i+1) or i, j + 1
    until i == 10[/html]

    الأعداد التي لا تحقق المطلوب تسمى الأعداد التعيسة
    -------- مشاهدة ممتعة -------
    موفق
    التعديل الأخير تم بواسطة ثامر أبو بلقيس; الساعة 13-12-2014, 03:34 PM.

  • #2
    جزاك الله خيرا أخى ابا بلقيس

    نسال الله ان يجعل ايامك كلها سعيدة

    تعليق


    • #3
      مرور عطر بارك الله فيك

      تعليق


      • #4
        شـكــ وبارك الله فيك ـــرا لك

        لك مني أجمل تحية .

        تعليق


        • #5
          بارك الله فيك مرور عطر

          تقديري

          تعليق


          • #6
            جزاك الله خيرا اخانا أبا بلقيس وبارك الله فيك

            تعليق


            • #7
              المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة

              الأعداد التي لا تحقق المطلوب تسمى الأعداد التعيسة
              الذين لا يعرفونك هم التعساء ..

              دمتَ معطاءً .. وجزاك ربك جنان الخلد

              تعليق


              • #8
                مرور عطر أستاذي الكريم

                تعليق

                مواضيع تهمك

                تقليص

                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 06-08-2025 الساعة 11:33 PM
                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 06-04-2025 الساعة 05:29 PM
                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 05-31-2025 الساعة 10:07 PM
                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 05-30-2025 الساعة 11:48 PM
                المنتدى: التصنيع والانتاج نشرت بواسطة: HaMooooDi الوقت: 05-30-2025 الساعة 09:36 AM
                يعمل...
                X