Urganch davlat universiteti axborot texnologiyalari kafedrasi

function getC(var f:text; var c:

char

):

boolean

; 

begin 

  getC:=

true

; 

  

if eoln(f) then begin 

    readln(f); 

    

if eoln(f) 

      

then begin c:=#

0

; getC:=

false 

and 

    else read(f,c) 

   

end 

   else read(f,c); 

 

end;

 

while getC(f,c) do begin 

  

{c simvolini qayta ishlash} 

end;

 

Simvolni  qayta  ishlashni  aniqlashtiramiz.  Misoldagi  shartdan  ko‘rinib  turibdiki  har  biri 

o‘ziga  xos qavslardan  iborat  to‘rtta  sanagich  mavjud  emas.  Qavslar  to‘g‘ri  yopilmayotganligini 

nazorat qilish uchun ular qanday tartibda olinayotganligi ni esda saqlash kerak.  

Shunday qilib bizda ochiq va hali yopilmagan qavslar ro‘yhati kerak. Yangi ochilayotgan 

qavsni  ro‘yxat  oxiriga  yozib  qo‘yamiz.  Yopiluvchi  qavs  paydo  bo‘lganida  oxirgi  olingan  qavs 

nechanchi bo‘lganini qarab ko‘ramiz. Agarda bu turli tanadagi qavslar yoki ro‘yxat bo‘sh bo‘lsa, 

u  holda  ifoda  noto‘g‘ri,  aks  holda  ro‘yxatdan  oxirgi  olingan  qavsni  yo‘q qilamiz.  To‘g‘ri  ifoda 

tugagach ro‘yhat bo‘sh bo‘ladi. Ro‘yxatda o‘zgartirishlar misoli quyidagi jadvalda berilgan 

---

 

O‘qilgan simvollar 

Hali yopilmagan qavslar ro‘yxati 

( 

( 

([ 

([ 

([ ] 

( 

([ ] < 

(< 

([ ] < > 

( 

([ ] < >) 

 

([ ] < >)< 

< 

([]<>)<> 

 

 

Hali  yopilmagan  qavslar  stek(stack)  yoki  magazine  –  yangi  ochilgan  qavs  uning 

yuqorisida  joylashadi,  yopiluvchi  o‘zining  ochiluvchisini  yuqoridan  siljitib  yuboradi,  “begona” 

ochiluvchi  esa  magazinning  yuqorisida  ifodaning  noto‘g‘riligi  haqida  xabar  beradi.  Simvollar 

massivi stack (uning o‘lchamini keyinchalik aniqlashtiramiz) va boshlang‘ich qiymati 0 bo‘lgan 

butun  o‘zgaruvchi  top  yordamida  magazinni  amalga  oshiramiz.  Massiv  –  ro‘yhat  elementlari, 

top- ularning miqdori, stack[top] elementi esa – so‘nggi hali yopilmagan qavsni bildiradi. 

Magazinga ochiluvchi qavsni qo‘shish  

int(yop); stack[top]:=c,

 

dec(top)  qavsni  yo‘q  qilishni  bildiradi.  Agar  top=0,  u  holda  magazin  bo‘sh  bo‘ladi 

(ifodani kata ishlash siklidan oldin top:=0 ni o‘zlashtirish kerak).  

Agar  yangi  simvol  –  yopiluvchi  qavs,  magazine  bo‘sh  yoki  uning  yuqorisida  “begona” 

qavs  bo‘lsa,  joriy  ifodaning  qolganini  quyidagi  skipTest  prosedura  yordamida  o‘tkazib 

yuboramiz: