29 - سلسلة تبسيط البرمجة – برنامج المتغير والثابت

السلام عليكم ورحمة الله وبركاته

بسم الله الرحمن الرحيم

سبق وعرفنا في الدرس الفرق بين المتغير أو المتحول وبين الثابت

12 - سلسلة تبسيط البرمجة – المتغيرات و الثوابت

https://arabia.io/go/5755

وتطبيقه بشكل عملي من خلال البرنامج التالي :

Module Module1

    Sub Main()
        Dim R As Double
        Const PI As Single = 3.14159
        Dim Space As Double
        Dim Circumference As Double
        Dim Key As Char

        Do
            Console.Clear()
            Console.WriteLine("Enter radius of circle ?")
            R = Console.ReadLine()
            Space = PI * R * R
            Console.WriteLine("Space = " + Space.ToString() + vbNewLine)
            Circumference = 2 * PI * R
            Console.WriteLine(String.Format("Circumference = {0}{1}", Circumference, vbNewLine))
            Console.WriteLine("Run again ? y/n")
            Key = Console.ReadLine(0)
        Loop Until Key = "n"

    End Sub

End Module

وأظن أنه لا يحتاج شرح مفصل فمعظمه أصبحتم تدركونه

الجديد هو أننا استخدمنا كلمة Const بدلا من Dim لتعريف ثابت وهو الثابت الرياضياتي بي

المستخدم في التعامل مع زوايا الرادايان وحساب محيط ومساحة الدائرة

و كلمة Const اختصار لكلمة Constant أي شيء ثابت غير قابل للتعديل

ولو جربتم إعطاء قيمة للثابت PI أثناء سير البرنامج فسيتولد خطأ أثناء الترجمة

بينما R وبقية المتغيرات نستطيع وضع أي قيم وتتغير أثناء البرنامج

كما أننا استخدمنا نوع المعطيات Single وهو رقم كسري ولكن تمثيله يكون ب 4 بايتات

أي نصف ما يحتاجه النوع Double

كما أننا نلاحظ أننا استخدمنا ثابت معرف مسبقا ضمن مكتبات النظام وهو vbNewLine وهو ثابت رمزي يمثل الانتقال إلى سطر جديد أي يحاكي الضغط على زر Enter للنزول إلى سطر جديد وذلك بدلا أن نستخدم تعليمة WriteLine() فارغة لكتابة سطر فارغ

أنوه أن الثابت يمكن أن يكون أي نوع من المعطيات فمثلا يمكن تعريف ثابت من نوع نص ليحفظ اسم طويل أو مسار مجلد بدلا من كتابته كل مرة

الواجب :

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

ثم إظهارها على الشاشة