تحدي "جوني كرابس"

مقدمة

بعد وقت قصير من نشري للتحدي، سألت "جوني كرابس"، صاحب دليل القدامى للفوز على طاولة الكرابس ، إن كان يرغب بقبول التحدي. موقع النظام المذكور لم يعد موجودًا، وهو ما يحدث عادةً مع أنظمة المراهنات. ويبدو أن أصحابه يختفون في منتصف الليل.

رد جون بسرعة وكان واثقًا جدًا بنظامه وقدرته على تحقيق ربح يتجاوز مليار لفة. روى لي عدة قصص عن أرباح كبيرة باستخدام نظامه، ولم يعترف إلا بخسارة كبيرة واحدة، وذلك لأنه كان ثملًا ولم يلتزم بالنظام. خلال نقاشنا، كان جون رجلًا محترمًا، بل رفض عرضي بالدفع إذا تغلب نظامه على التحدي. لقد آمن به من خلال تجاربه الشخصية وشهادات الآخرين الذين اشتروا نظامه.

يعتمد نظامه على فلسفة مفادها أن احتمالية الفوز تزداد بعد خسارة سابقة. بالإضافة إلى ذلك، يتضمن نظامه ضوابط للحد من الخسائر، حيث تكون أكبر خسارة في خط المرور ثمانية أضعاف أصغر خسارة فقط. يراهن فقط على خط المرور ويأخذ الاحتمالات. تكمن المغالطة في افتراض أن احتمالية الفوز تزداد بعد الخسارة. والنتائج أدناه تؤكد ذلك.

نسبة الوحدات المفقودة إلى الوحدات المراهنة هي 0.005595، وهي قريبة من ميزة الكازينو في لعبة الكرابس البالغة 0.005720 عند مضاعفة الاحتمالات بالكامل، ويعود الفرق إلى التباين العشوائي. يختلف الحد الأقصى للوحدات الفائزة اختلافًا كبيرًا من جلسة لأخرى، ومن غير المتوقع تكرار نتيجة 2111 أعلاه بسهولة. فيما يلي الحد الأقصى للوحدات الفائزة في أي وقت بناءً على عشر جلسات مختلفة، كل منها مليون لفة: 224، 2521، 1226، 1199، 1298، 6130، 3123، 224، 851، و1314.

تجدون أدناه نسخة من البرنامج. وضعتُ *** على بعض العوامل التي قد تكشف استراتيجيته. ولأن البرنامج لا يزال معروضًا للبيع، فلن يرغب في إعطائه مجانًا.

وأود أن أشكر جون على مشاركته وتعاونه في هذه التجربة.

# تضمين <stream.h>
# تضمين <stdlib.h>
# تضمين <string.h>
# تضمين <math.h>

int main(void)
{
int numpass، numodds، numroll، tbet، er، es، point، roll، die[2]، i، n، max، bet، win، num، bil؛

cerr << "أدخل البذرة ";
سين >> ن؛

لـ (i = 1؛ i <= n؛ i++)
{
    رقم = راند();
}

cerr << "أدخل عدد التجارب";
سين >> ن؛

عدد اللفات = 0؛
بيل = 0؛
الفوز = 0؛
تبت = 0؛
الحد الأقصى = 0؛
رقم المرور = 0؛
عدد الأرقام = 0؛
بيل = 0؛


كرر ذلك حتى نهاية التجربة
{
    es = 0؛
    الرهان = 2؛

    كرر حتى نهاية السلسلة
    {
        النقطة = 0؛
        er = 0؛

        كرر ذلك حتى نهاية الجولة
        {
            لـ (i = 0؛ i <= 1؛ i++)
            {
                num = rand(); // الحد الأقصى لـ rand() هو 32767
                die[i] = 1 + int(num * 6 / 32767)؛
            }

            لفة = نرد[0] + نرد[1]؛

            رقم لفة++؛

            إذا (النقطة == 0)
            {
                رقم ++؛

                إذا ((roll == 7) || (roll == 11))
                {
                    الفوز += الرهان؛
                    tbet += bet؛
                    إر = 1؛
                    es = 1؛
                }
                وإلا إذا ((roll == 2) || (roll == 3) || (roll == 12))
                {
                    إر = 1؛
                    الفوز -= الرهان؛
                    tbet += bet؛
                }
                آخر
                {
                    نقطة = لفة؛
                    نومودز++؛
                }
            }
            وإلا إذا (التدحرج == نقطة)
            {
                إذا ((الرمي == 4) || (الرمي == 10))
                {
                    الفوز += 5 * الرهان؛
                    tbet += 3 * bet؛
                }
                وإلا إذا ((roll==5)||(roll==9))
                {
                    الفوز += 4 * الرهان؛
                    tbet += 3 * bet؛
                }
                آخر
                {
                    الفوز += 4 * الرهان؛
                    tbet += 7 * bet / 2؛
                }

                إر = 1؛
                es = 1؛
            }
            وإلا إذا (النتيجة == 7)
            {
                إذا ((النقطة == 6) || (النقطة == 8))
                {
                    الفوز -= 7 * الرهان / 2؛
                    tbet += 7 * bet / 2؛
                }
                آخر
                {
                    الفوز -= 3 * الرهان؛
                    tbet += 3 * bet؛
                }

                إر = 1؛
            }

        } while (er == 0); // كرر حتى نهاية الجولة

        إذا (tbet > 1000000000)
        {
            بيل++؛
            تبت -= 1000000000؛
        }

        إذا (الفوز > الحد الأقصى)
        {
            الحد الأقصى = الفوز؛
        }

        إذا (es == 0)
        {
            إذا (الرهان == ***) { الرهان = ***؛ } وإلا
            إذا (الرهان == ***) { الرهان = ***؛ } وإلا
            إذا (الرهان == ***) { es = ***؛ }
        }

    } while (es == 0); // كرر حتى نهاية السلسلة


} while (numroll < n); // كرر حتى نهاية التجربة

cerr << "إجمالي اللفات = " << numroll << "\n";
cerr << "إجمالي رهانات خط المرور = " << numpass << "\n";
cerr << "إجمالي الرهانات المحتملة = " << numodds << "\n";
cerr << "إجمالي المكاسب = " << الفوز << "\n";
cerr << "إجمالي الرهانات = " << bil << " مليار + " << tbet << "\n";
cerr << "الأرباح العالية = " << الحد الأقصى << "\n";
}

كتبه: Michael Shackleford