الانتقال إلى المحتوى الرئيسي

كيفية قلب خط في باسكال: دليل مع أمثلة وتعليمات خطوة بخطوة

  • الأستاذ قاصد بنو النجار
  • الأسئلة

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

يمكن أن يكون قلب سلسلة مفيدا في العديد من المواقف ، مثل التحقق من المتناظرات أو ببساطة تغيير ترتيب الأحرف في سلسلة. هناك عدة طرق لإنجاز هذه المهمة في باسكال ، وسنلقي نظرة على أكثرها فعالية وأبسطها.

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

نموذج التعليمات البرمجية:

 

  1. النتيجة: = نتيجة + شارع [أنا];
  2. النهاية;
  3. في هذا المثال ، نعلن الدالة ريفيرسترينغ ، الذي يأخذ سلسلة ستر كوسيطة وإرجاع سلسلة مقلوب. ثم نقوم بإنشاء متغير نتيجة يقوم بتخزين السلسلة المقلوبة. ثم نستخدم حلقة تبدأ من الحرف الأخير من السلسلة وتستمر إلى الحرف الأول. داخل الحلقة ، نضيف كل حرف إلى متغير النتيجة. في النهاية ، تقوم الدالة بإرجاع سلسلة مقلوبة.
  4. وبالتالي ، فقد نظرنا في إحدى طرق قلب سلسلة في باسكال باستخدام حلقة. هذه الطريقة بسيطة وفعالة للغاية ، ويمكن استخدامها في برامج مختلفة.
  5. كيف يمكنني الوجه خط في باسكال?
  6. الأساليب والتعليمات

1. باستخدام مجموعة من الأحرف

2. باستخدام العودية

أمثلة التعليمات البرمجية وشرح مفصل

المشاكل المحتملة وطرق حلها

نصائح وتوصيات إضافية

سؤال وجواب

كيف يمكنني الوجه خط في باسكال?

يمكنك قلب سلسلة في باسكال باستخدام حلقة ومتغير مؤقت.

وفيما يلي رمز المثال الذي يوضح كيفية الوجه خط:

عكس البرنامج;

فار

أوريجنالسترينغ ، عكسسرينغ: سلسلة;

أنا: عدد صحيح;

بيغن

السلسلة الأصلية: = ' مرحبا ، العالم!'؛//تعيين سلسلة المصدر

ل أنا: = طول (أوريجنالسترينغ) إلى 1 تفعل

بيغن

سلسلة عكسية: = سلسلة عكسية + سلسلة أصلية [أنا]; // أضف كل حرف بترتيب عكسي إلى متغير السلسلة العكسية

النهاية;

وريتلن ('سلسلة المصدر:' ، أوريجنالسترينغ);

وريتلن ('سلسلة مقلوب:' ، ريفيرسدسترينغ);

النهاية.

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

نتيجة تنفيذ البرنامج:

الخط الأصلي: مرحبا ، العالم!

الخط المقلوب:!روما ، تيفيرب

وبالتالي ، باستخدام حلقة ومتغير مؤقت ، يمكنك بسهولة قلب سلسلة في باسكال.

الأساليب والتعليمات

في لغة برمجة باسكال ، هناك عدة طرق لقلب سلسلة. في هذا القسم ، سنلقي نظرة على طريقتين من أكثر الطرق شيوعا.

1. باستخدام مجموعة من الأحرف

الطريقة الأولى هي تحويل سلسلة إلى مصفوفة من الأحرف ، ثم تبديل عناصر المصفوفة بالتناوب حتى نصل إلى المنتصف. للقيام بذلك ، سوف نستخدم فهرسين: واحد يبدأ في بداية المصفوفة ، والآخر يبدأ في نهاية المصفوفة. Мы будем продолжать обмен элементов до тех пор, пока индексы не пересекутся.

Пример кода:

procedure ReverseString(var str: string);

var

i, j: Integer;

temp: Char;

begin

i := 1;

j := Length(str);

while i < j do

begin

temp := str[i];

str[i] := str[j];

str[j] := temp;

Inc(i);

Dec(j);

end;

end;

2. Использование рекурсии

تعتمد الطريقة الثانية على دالة تكرارية سيتم استدعاؤها حتى يصبح طول السلسلة 1. في كل مكالمة ، ستتجاهل الوظيفة الحرف الأول من السلسلة وتسمي نفسها لبقية السلسلة. ثم سنضيف الحرف الأول إلى بداية السلسلة المتبقية للحصول على السلسلة المقلوبة.

نموذج التعليمات البرمجية:

وظيفة عكس (شارع: سلسلة): سلسلة;

بيغن

إذا كان الطول (شارع) < = 1 ثم

النتيجة: = شارع

  1. وريتلن ('سلسلة مقلوب:' ، ريفيرسدستر);

النهاية.

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

  • فار

شارع: سلسلة;

  • ريفيرسيدستر: سلسلة;

أنا: عدد صحيح;

  1. بيغن

// دخول خط