function getC(var f:text; var c:
char
):
boolean
;
U agar ifoda tugasa o‘zining parametriga ifodaning keying sivolli yoki
constantani
o‘zlashtiradi va ifoda simvolli olinganligi to‘g‘risidagi belgini qaytaradi. Get c funksiyani
aniqlashtiramiz. Ifoda bir necha qatorlarda yozilgan, shuning uchun yangi simvolni o‘qishdan
oldin joriy qator tamom bo‘lganligi tekshiramiz. Agar tamom bo‘lmagan bo‘lsa o‘qiymiz va
yangi simvolni qaytaramiz. Agar qator tugagan bo‘lsa, u holda ifoda tamom bo‘lganligi yani
matn tugaganligi yoki keyingi qator bo‘sh ekanligini tekshiramiz. Agar ifoda tugagan bo‘lsa, u
holda simvol yo‘q va #0 sifatida ekanligi to‘g‘risidagi belgini qaytaramiz. Agar ifoda tamom
bo‘lgan bo‘lsa, yangi simvolni o‘qiymiz
Do'stlaringiz bilan baham: |