سجل سؤال { سؤال_نصي: نص, جواب: ص64 }
دالة ابدأ_الرئيسية() -> ص64 {
    دع أسئلة: قائمة<سؤال> = [
        سؤال { سؤال_نصي: "2 + 3?", جواب: 5 },
        سؤال { سؤال_نصي: "9 - 4?", جواب: 5 },
        سؤال { سؤال_نصي: "3 * 4?", جواب: 12 },
        سؤال { سؤال_نصي: "12 / 3?", جواب: 4 },
        سؤال { سؤال_نصي: "7 + 8?", جواب: 15 }
    ].
        اطبع(أسئلة[0]::سؤال_نصي + " ").
        دع سطر: نص = اقرأ_سطر().
        إذا (سطر يطابق "q") {
            اطبع("Stopped early. Correct: 0; answered: 0; total: " + نسق_ص64(طول(أسئلة)) + ".\س").
            أرجع 0.
        }
        دع محلل: نتيجة<ص64> = حلل_ص64(سطر).
        إذا (محلل::نجاح) {
            اطبع("Parsed: " + نسق_ص64(محلل::قيمة) + "\س").
        } وإلا {
            اطبع("Invalid: " + محلل::الخطأ::الرمز + "\س").
        }
    أرجع 0.
}