نظرًا لأنه يمكن الوصول إلى الحرف عن طريق الفهرس ، يمكنك استخدام حلقة متغيرة للتكرار على جميع الأحرف ، والتي ستأخذ قيم الفهرس الممكنة. على سبيل المثال ، سيبدو البرنامج الذي يعرض جميع رموز الأحرف في السلسلة s بهذا الشكل
<قبل>
بالنسبة إلى i: = 1 إلى length (s)
writeln (s [i] ، ord (s [i]))
شروحات للبرنامج:
1) تحدد الدالة length (s) طول السلسلة. فهرس الحرف الأول هو 1 وفهرس الأخير هو الطول (الأطوال). سيأخذ متغير الحلقة i القيم من 1 إلى الطول (الأطوال).
2) في كل سطر ، سيتم عرض الرمز نفسه أولاً ، ثم رمزه ، والذي يتم إرجاعه بواسطة الوظيفة المضمنة ord ()
يمكن كتابة نفس التعداد بشكل أقصر:
<قبل>
ل c in s do & nbsp؛
نبسب ؛ نبسب ؛ writeln (c ، ord (c)) ؛
في هذا الجزء ، يدور رأس الحلقة عبر جميع الأحرف s ، ويضعها بدورها في المتغير c.
إن خصوصية باسكال عند التعامل مع الجمل هي أن الأوتار هي كائنات قابلة للتغيير. بمعنى آخر ، يمكننا تغيير الأحرف الفردية لسلسلة.
على سبيل المثال ، سوف تعمل العبارة التالية
<قبل>
ق [5]: = & # 39 ؛ أ & # 39 ؛؛
يمكنك أيضًا إنشاء سلسلة جديدة من الأحرف بالتغييرات المطلوبة.
على سبيل المثال ، برنامج يستبدل جميع الأحرف & # 39 ؛ a & # 39 ؛ إلى الشخصيات & # 39 ؛ b & # 39 ؛ سيبدو هكذا:
<قبل>
قراءة (ق) ؛
نبسب ؛ نبسب ؛ بالنسبة إلى i: = 1 إلى length (s) ابدأ
نبسب ؛ نبسب ؛ نبسب ؛ نبسب ؛ if s [i] = & # 39 ؛ a & # 39 ؛ ثم s [i]: = & # 39 ؛ b & # 39 ؛؛
نبسب ؛ نبسب ؛ نهاية؛
writeln (s) ؛
في هذا المثال ، نقوم بعمل حلقة عبر جميع أحرف السلسلة s. في نص الحلقة ، نتحقق من قيمة المتغير s [i]: إذا كان الحرف يطابق الحرف & # 39 ؛ a & # 39 ؛ ثم نستبدلها بـ & # 39 ؛ b & # 39 ؛.
نبسب ؛