Urganch davlat universiteti axborot texnologiyalari kafedrasi

program Despace; 

  

type tState=

0..2

; 

  

var f,g:text; 

      c:

char

; 

      state:tState; 

  

begin 

    assign(f,

'Despace.txt'

);reset(f); 

    assign(g,

'Despace.sol'

);rewrite(g); 

    state:=

0

; 

    

while 

true 

do begin 

      if eof(f) then 

break

; 

      read(f,c); 

      

case state of  

        

0

:

begin 

            write(g,c); 

            

if c<>

' ' 

then state:=

1 

          

end; 

        

1

:

if c<>

' ' 

            

then write(g,c) 

            

else state:=

2

; 

        

2

:

if c<>

' ' 

then begin 

              write(g,

' '

, c); 

              state:=

1 

            

end; 

       

end; 

     

end; 

     close(f);close(g); 

end.

 

 

Holatlarning yakuniy sistemasi va kiruvchi simvollar ta’siri ostida, ular orasidagi o‘tishlar 

qoidalari, norasmiy ravishda, yakuniy avtomat deyiladi. Kiruvchi signallarni o‘qib va o‘zlarining 

holatlarini o‘zgartirib  avtomat  ishlaydi.  Avtomat  holati  yordamida  masalan,  ushbu  holatga  olib 

keluvchi  simvollar  qo‘yilib  zanjirchalarni  tasvirlash  mumkin.  Shunda  avtomat  qo‘llab 

zanjirchalarni o‘zini holati bilan bilib oladi. 

---

 

2.2.2 Izohlarni yo‘q qilish. 

2.7-masala.  Paskal  dasturidagi  izoh-bu  “(*”bilan  boshlanadigan”)”  bilan  tugallanadigan 

va ichida “*)” bo‘lmagan simvollar ketma-ketligi. Paskal dasturidagi matn o‘qilsin, undagi izzox 

yo‘q  qilinsin  va  boshqa  matinga  chiqarilsin.  Yangi  matinni  qatorlarga  ajratish  axamiyatga  ega 

emas. 

Masalaning tahlili. Oldingi masaladagidek, matindagi holatlarni ajratamiz: 

out – “izohdan tashqarida” 

begs – “izohning boshlanishi”(ochiluvchi qavs o‘qilgan), 

comm – “izohning ichida”(qavsdan keyin * o‘qilgan), 

endc –“izohning tugallanishi” (izohning ichida * o‘qilgan). 

Izohni  yozishda  matinda  (,)*  simvollar  ishlatiladi,  boshqa  har  qanday  simvol  α  orqali 

belgilaymiz.  Holatlar  orasidagi  o‘tishlarni  va  joriy  c  simvolni  izohlashdagi  harakatlarni  jadval 

ko‘rinishida  bering.  Ushbu  masalada  matinga  faqat  simvollarni  chiqarish  kerak,  shuning  uchun 

“/” belgidan keyin harakatni belgilash o‘rniga faqat chiqariluvchi simvollarni ko‘rsatamiz. 

Agar o‘tishda holat o‘zgarmasa, uni yozmaymiz. 

 

 

Simvol 

 

 

 

Holat 

( 

* 

) 

α 

Out 

begs/ 

/* 

/ ) 

/ α 

Begs 

( 

Comm 

out/ (,) 

out/ (,α 

Comm 

 

Endc 

 

 

Endc 

comm 

 

out 

comm 

 

Dasturda izohlarni yo‘q qilish uchun ko‘rstilgan avtomatdan foydalaning. 

2.8. masala. Paskal-dasturining matnida (*…*) ko‘rinishidagi izohlarni yo‘q qilish kerak 

(qatorlar  bo‘yicha  matni  bo‘lish  axamiyat  kasb  etmaydi),  biroq,  “qavslar”  (*va*)  materiallar 

ichida joylashishi mumkinligi hisobga olinsin. Literal-bu apostrflardagi simvollar ketma-ketligi. 

Apostrflar izohlar ichida ham bo‘lishi mumkin. 

Masala taxlili. Masala oldingisiga analogikdir.”o‘ziga xos” (,), * simvollarga apstrof “,” 

qo‘shilgan,  boshqa  har  qanday  simvol  α  bilan  belgilangan.  Matnda  literal  boshlanganini 

bildiruvchi 1 tr holatini qo‘shamiz. Joriy c simvolni qayta ishlashdagi flotlar orasidagi o‘tishlarni 

quydgicha jadvalda beramiz (“/” belgidan keyin faqt chiqariluvchi simvollar ko‘rsatilgan) 

Literallarichidagi  ikkilangan  apostrflar,  bu  vaziyatda  alohida  ko‘rsatilmagan  bo‘lsada, 

ushbu  avtomat  bilan  to‘g‘ri  qayta  ishlashini  takidlaymiz.  Biroq,  agarda  literallarni  nusxalash 

emas  o‘zgartirish  kerak  bo‘lsa,  harakatlarni  qiyinlashtirish  kerak  bo‘lar  edi.  Dasturda  berilgan 

avtomatni amalga oshiring.