عد تردد الرسالة في صفيف

• أبريل 29, 2024

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

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

أكلت قطتي.

سوف تعيد صفحة تقول:

a: 2
ج: 1
ه: 1
أنا: 1
م: 1
t: 2
ص: 1

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

ديم LetterCount (26)
ل CurrLtr = 1 إلى 26
LetterCount (CurrLtr) = 0
التالى

هذا مثال جيد على الحلقة التالية. حسنا ، حتى الآن جيد جدا. لديك 26 نقطة عند الصفر ، في انتظار بدء العد. الآن للعمل في طريقك من خلال الجملة لمعرفة ما هو فيه. لنفترض أنك تسمي هذه الجملة CurrText.

أولاً ، تريد التحقق من كل حرف في الجملة. سأفعل ذلك باستخدام حلقة تنفيذية حتى تستطيع أن ترى كيف يعمل ذلك. لذلك سوف تبدأ بـ:

سينلين = لين (CurrText)
CurrCtr = 1
تفعل بينما CurrCtr <= SenLen
CurrLtr = يسار (CurrText ، 1)

لديك الرسالة التالية بالترتيب. الآن ، كل حرف بالطبع لديه قيمة أسكي المرتبطة به. هذه تتراوح بين 65 إلى 90 إلى Z. القضية لا يهم. إذاً ، بجانب الحرف الكبير ، تأكد من سقوطه بين 65 و 90 ، وطرح 64 بحيث A = 1 و Z = 26.

CurrLtr = ucase (CurrLtr)
CurrLtrA = تصاعدي (CurrLtr)
CurrLtrA = CurrLtrA - 64

إذن لديك الآن رقم من 1 إلى 26 يشير إلى الحرف الذي هو هذا. الخطوة التالية هي بالطبع سهلة. أنت فقط زيادة هذا دلو! إذا كنت ترغب في ذلك ، فيمكنك التأكد من تجاهل أي رسالة غير رسمية ، إذا كنت قلقًا بشأن دخولهم إلى ساحة المشاركات.

إذا CurrLtrA> 0 و CurrLtrA <65 بعد ذلك
LetterCount (CurrLtrA) = LetterCount (CurrLTrA) + 1
إنهاء إذا

والآن في نهاية الحلقة ، تتخلص من الرسالة التي كنت تعمل عليها فقط ، بحيث عندما تتجول في الحلقة ، فإن الحرف الأول في الجملة هو الحرف التالي بالترتيب.

CurrText = يمين (CurrText ، لين (CurrText) - 1)
CurrCtr = CurrCtr + 1
عقدة

والآن ، أصبح صفيفك ممتلئًا بالأرقام التي تتراوح من 0 إلى أي شيء ، يشير كل منها إلى عدد المرات التي تم فيها العثور على هذه الرسالة. يمكنك عرضها بأي طريقة تريدها. إذا كنت تريد استخدام حلقة ووظيفة CHR ، والتي تعرض الحرف الذي يحتوي على رمز ASCII معين ، فيمكنك القيام بما يلي:

ل CurrLtr = 1 إلى 26
response.write "الرسالة"
CurrAscii = CurrLtr + 64
CurrLtrA = chr (CurrAscii)
response.write CurrLtrA & "تم العثور على"
response.write LetterCount (CurrLtr) & "times.
"
التالى

تأكد من التوقف عن طريق منتدياتنا أو الكتابة إذا كان لديك أي أسئلة!

مقدمة لآسيا والمحيط الهادئ قم بتنزيل هذا الكتاب الإلكتروني للحصول على كل ما تحتاج لمعرفته حول تعلم ASP - من تعليمي خطوة بخطوة إلى قوائم الوظائف ، ونموذج التعليمات البرمجية ، والأخطاء الشائعة والحلول ، وأكثر من ذلك بكثير! 101 صفحة.

تعليمات الفيديو: رسالة من محمد نوح القضاة إلى نتنياهو .. فماذا جاء بها؟ (أبريل 2024).