Algorithme number_of_digits

    var attempts, max_attempts, correct_answer, guess, t: entier

  debut
    attempts = 0
    max_attempts = 2
    correct_answer = 3
    ecrireln("✨ لغز بيولوجي شيق ✨")
    ecrireln("كم من قلب لدى الأخطبوط؟")
    ecrireln("------------------------------------------------")
    ecrireln("الخيارات المتاحة:")
    ecrireln("1) قلب واحد فقط")
    ecrireln("2) قلبان")
    ecrireln("3) ثلاثة قلوب")
    ecrireln("4) ثمانية قلوب (واحد لكل ذراع!)")
    ecrireln("------------------------------------------------")

    tantque (attempts < max_attempts) faire
        t = max_attempts - attempts
        ecrireln(" باقي لك ", t, " محاولات")
        ecrireln("اختر رقم الإجابة (1 أو 2 أو 3 أو 4): ")
        lire(guess)
        attempts = attempts + 1
        si (guess == correct_answer) alors
            ecrireln("🎉 برافو! صحيح تماماً!")
            ecrireln("الأخطبوط لديه 3 قلوب: قلبان للخياشيم وواحد للجسم كله")
        sinon
            si (attempts < max_attempts) alors
              ecrireln("✖️ للأسف خطأ... حاول مرة أخرى!")
            sinon
              ecrireln("انتهت المحاولات 😔")
              ecrireln("الإجابة الصحيحة هي: 3 قلوب")
              ecrireln("الأخطبوط لديه قلبان لضخ الدم عبر الخياشيم وقلب ثالث للجسم!")
            finsi
        finsi
    fintantque

  fin
              

  ✨ لغز بيولوجي شيق ✨
  كم من قلب لدى الأخطبوط؟
  ------------------------------------------------
  الخيارات المتاحة:
  1) قلب واحد فقط
  2) قلبان
  3) ثلاثة قلوب
  4) ثمانية قلوب (واحد لكل ذراع!)
  ------------------------------------------------
    باقي لك 2 محاولات
  اختر رقم الإجابة (1 أو 2 أو 3 أو 4):
  1
  ✖️ للأسف خطأ... حاول مرة أخرى!
    باقي لك 1 محاولات
  اختر رقم الإجابة (1 أو 2 أو 3 أو 4):
  3
  🎉 برافو! صحيح تماماً!
  الأخطبوط لديه 3 قلوب: قلبان للخياشيم وواحد للجسم كله


  --------------
  [Fin de programme]