امروز می خواهم یک دستور مهم و پر کاربرد را به شما آموزش بدهم :

# دستور if

این دستور را اگر بخواهیم با معنای فارسی آن که در ( ) نوشته ام بنویسیم اینطور می شود :

(سپس)then  شرط  (اگر)if

(شروع)begin

;دستورات

;(پایان)end

که یعنی اگر شرط ما درست بود دستورات را انجام بده .

مثال :

در مثال زیر یک عدد از کاربر می گیریم و اگر آن عدد از 100 بزرگتر بود yes و اگر مساوی 100 بود yesno و اگر کوچکتر از 100 بود no را در جواب نمایش میدهد .

;Program ibpersianblogcom

;Uses WinCRT

var

;a:integer

Begin

;clr scr

;("write("enter greade of our weblog more than 100 or 100 or less than 100

;(readln(a

if a>100 then

begin

;("writeln ("yes

;end

if a=100 then

begin

;("writeln ("yesno

;end

if a<100 then

begin

;("writeln ("no

;end

.End

همانطور که در مثال بالا دیدید در بیان شرط از علامت های <>= استفاده کرده ایم . در زیر اینگونه علامت ها را به طور کامل توضیح می دهیم .

تساوی =

نامساوی<>

کوچکتر>

بزرگتر<

کوچکتر یا مساوی >=

بزرگتر یا مساوی <=

نکته !

اگر ما از دستور if در یک خط استفاده کنیم نیاز به brgin و end نیست مانند این مثال :

("if a=100 then writeln("yesno

توجه !

از {} برای نوشتن توضیحات در وسط کد استفاده می شود . از این پس هر متنی را که در میان {} در کدها نوشتیم فقط برای توضیح بیشتر است .

# دستور if به همراه else

این دستور دقیقا" مثل if است ولی فقط قسمتی به نام else دارد که توضیح می دهم :

(سپس)then  شرط  (اگر)if

(شروع)begin

;دستورات

|(پایان)end

(در غیر اینصورت)else

(شروع)begin

;دستورات

;(پایان)end

;End

که یعنی اگر شرط ما درست بود دستورات قسمت اول را انجام بده و در غیر اینصورت اگر شرط درست نبود دستورات قسمت دوم را انجام بده .

نکته !

قبل از else , در خط بالایش نباید ; قرار بگیرد که من با | نشان داده ام .

 # دستور: writeln

  همان دستورwrite می باشد با این تفاوت که بعد از عمل نوشتن نوشته به خط بعد می رود . 

استفاده از متغیر :

من در اینجا یک متغیر از نوع string (متنی) تعریف کرده ام .

 پس از تعریف متغیر باید داده را در آن قرار داد که برای این کار از علامت انتصاب یعنی := مانند قسمت قهوه ای استفاده می کنیم .

متغیر متغیر ها انواع مختلفی دارند که هر نوع آن ها استفاده مخصوص به خود را دارند . مثلا متغیر  strin برای متن وintegerبرای اعداد می باشد .

# دستورread

همچنین دستورreadln داده ها را از کاربر در خط بعد می گیرد .