كيفية إنشاء ملف باسكال

جدول المحتويات:

كيفية إنشاء ملف باسكال
كيفية إنشاء ملف باسكال

فيديو: كيفية إنشاء ملف باسكال

فيديو: كيفية إنشاء ملف باسكال
فيديو: دورة تعلم البرمجة بلغة الباسكال المحاضرة الاولى 2024, شهر نوفمبر
Anonim

تعد لغة باسكال واحدة من أكثر لغات البرمجة استخدامًا نظرًا لبساطتها ووظائفها الرائعة. من خلال Pascal ، يمكنك العمل مع الملفات عن طريق إنشائها أو تعديلها باستخدام الوظائف المناسبة.

كيفية إنشاء ملف باسكال
كيفية إنشاء ملف باسكال

تعليمات

الخطوة 1

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

var textfile: نص ؛ نوع الاسم: سلسلة ؛ سلسلة نصية: سلسلة ؛ أ ، ب: عدد صحيح ؛ حيث يكون textfile متغيرًا من نوع Text يحتوي على اسم الملف. Nametype - نوع إدخال النص الذي يتم تعيين السلسلة إليه. Textstring هو سلسلة نصية من النوع المناسب. A و b متغيرات مساعدة تخزن قيمًا عددية صحيحة.

الخطوة 2

اطلب من المستخدم إدخال اسم نوع الملف المطلوب. يجب أن يكون مرتبطًا بملف text. Writeln نفسه ('من فضلك ، اكتب اسم كتابة البيانات') ؛

Readln (نوع الاسم) ؛

تعيين (ملف نصي ، نوع الاسم) ؛

الخطوه 3

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

Writeln ('اكتب أرقام السلاسل:')؛

Readln (ب) ؛ {متغير يخزن عدد الأسطر}

Writeln ('من فضلك ، اكتب السلاسل:') ؛

الخطوة 4

لكتابة عدد ثابت من الأسطر ، استخدم حلقة ، يجب أن يتوافق المعامل الأول منها مع رقم السطر الأول من الملف ، وفي هذه الحالة الرقم 1. لـ a: = 1 to b do

يبدأ

Readln (سلسلة نصية) ؛

Writeln (ملف نصي ، سلسلة نصية) ؛ {وظيفة كتابة الملف}

نهاية؛

الخطوة الخامسة

اخرج من الملف وقم بإنهاء البرنامج باستخدام الوظائف المناسبة. اعرض أيضًا إشعارًا حول التسجيل الناجح. لتجنب مشاكل الإخراج ، قم بتعيين readln.close ثاني (ملف نصي) ؛

Writeln ("النجاح") ؛

readln.

نهاية.

الخطوة 6

تم إنشاء الملف بنجاح. قم بتجميع النص وحفظه من خلال قائمة بيئة البرمجة الخاصة بك.

موصى به: