مفيدة في حين حلقة للمبرمج

قد لا يكون مبرمج المبتدئين مألوفًا بعدواحدة مفيدة في حين حلقة. هذه هي عملية دورانية نموذجية في بيئة باسكال. وهو مناسب للاستخدام في مهام مختلفة ، لذلك سنقوم بتحليل كيف يمكنك تضمين هذه الدورة في البرنامج.

أثناء دورة While يتطلب Pascal التنسيق التالي:

• في حين (الشرط) القيام (تبدأ عند الضرورة).
• خوارزمية الفعل.
• نهاية (إذا كان هناك أمر بدء).

السطر الأول هو "سقف" الأمر. يمكن أن يكون الشرط هو القيمة العددية للحد الفاصل للمتغير Integer (d <100) ، قيمة متغير من النوع boolean (t = True) أو string (tex = "hello"). يتم تعيين الأمر "begin" إذا كان يجب استيفاء أكثر من شرط في جسم الحلقة. فيما يلي وصفًا للإجراءات التي يجب أن يقوم بها البرنامج ، شريطة تنفيذ حلقة While. قد يكون هناك العديد من الأوامر والإجراءات والوظائف ، مثل الدورات. في النهاية ، تحتاج إلى وضع الأمر "النهاية" ، إذا كان ، بالطبع ، السطر الأول هو "البدء".

الآن النظر في أمثلة البرامج التييحتوي على الأمر الموصوف. على سبيل المثال ، نحن بحاجة إلى العثور على مجموع الأعداد الصحيحة الموجبة n الأولى. لهذا ، نفترض في البداية أن ن (السماح لها دائما أكبر من الصفر). ثم ابدأ في الحلقة. من المهم أن نفهم أنه يجب أن يعمل حتى يصل إلى قيمة الرقم n. هناك أكثر من حل للمشكلة ، لكننا سنركز على الحل الذي يؤثر على استخدام العداد الذي يحتاج إلى التثبيت. بشكل افتراضي ، يتم استخدام المتغير i لهذا. قبل البدء في العمل به ، يجب عليك تعيين قيمة "1". يخدم العداد كمصطلح لكل عمل دوري جديد. بناءً على مهمتنا ، نحتاج دائمًا إلى إضافة واحد إليها. وهكذا ، فإن المؤشر الرقمي للعداد سوف يساوي قيمة الرقم n يوما ما. ستكون هذه إشارة لإنهاء البرنامج. لحساب المجموع ، نقدم المتغير k. مع كل تكرار جديد ، سيتم تعيين القيمة السابقة بالإضافة إلى الرقم i. بعد العد النهائي ، يجب عليك إخراج k الأولي فقط إلى الشاشة. هذا هو شرح موجز للبرنامج بالكلمات. الآن نحن نبحث في رمز البرنامج.

Readln (عدد) "- اقرأ الرقم n.

i: = 1 ؛ k: = 0؛ "- قمنا بتشغيل العداد ، صفر قيمة المجموع.

بينما أنا <= ن تبدأ "- تعيين حالة الحلقة.

k: = k + i؛ i: = i + 1؛ "- قم بإضافة القيمة إلى المجموع ، قم بتحديث العداد.

ينتهي. "- يختتم وصف While.

Writeln (k)؛ - إخراج البيانات.

دعونا نتعرف على مثال آخر. نحتاج الآن إلى المستخدم من لوحة المفاتيح لملء الأسماء n التي ستحفظ مصفوفة النص. المبدأ هنا مشابه للماضي. أدخل الرقم n ، وقم بتنشيط حلقة While وقم بتعيين الشرط. علاوة على ذلك ، فإننا نرمز بالإدخال من لوحة المفاتيح إلى ذاكرة خلية المصفوفة. نحن وضع العداد ، ننتهي من العمليات المتكررة. بعد ذلك ، إعادة تعيين العداد وإخراج الصفيف. صحيح ، إعادة تعيين العداد في هذا السياق يعني تعيينه قيمة واحدة ، حيث لا يمكنك عرض الخلية الصفرية للمصفوفة (وهي غير موجودة). رمز البرنامج كما يلي: من هذا البرنامج تحصل على مجموع سلسلة من الأعداد الصحيحة الموجبة ، والتي تنتهي بالعدد الذي تم إدخاله n. يجب أن يكون مفهوما أنه في غياب عداد ، فإن حلقة باسكال باس لا تنتهي أبدا. إذا نسيت هذا الأمر فجأة ، عند تنفيذ رمز البرنامج ، سيبدأ الكمبيوتر في التعليق. يتم التعامل مع هذا الزر "إيقاف مؤقت". كمقابل لمجموعة متنوعة ، استخدم المتغير c.

Readln (عدد)

c: = 1؛

بينما ج <= ن تبدأ "- تحديد الشرط.

Readln (a [c])؛ c: = c + 1؛ "- قراءة البيانات من لوحة المفاتيح ، إضافة القيمة إلى العداد.

ينتهي. "- ننتهي من الدورة.

c: = 1؛ "- قم بإرجاع القيمة إلى القيمة الأصلية.

بينما c <= n لا تكتب (a [c])؛ "- عرض أسماء ن.

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