Mavzu: Ma’lumotlarni kiritish-chiqarish operatorlari. Sodda operatorlar. Reja

Mavzu: Ma’lumotlarni kiritish-chiqarish operatorlari. Sodda operatorlar.

Reja:

1. 
   Ma'lumotlarni kiritish operatorlari ReadLn va Read
   
2. 
   OPERATORNING IJROI TARTIBI
   
3. 
   Dasturlarni kiritish va bajarish
   
4. 
   Xulosa
   
5. 
   Foydalanilgan adabiyotlar
   

Ma'lumotlarni kiritish operatorlari ReadLn va Read. Bayonotlarni o'qing va o'qing. Axborotni kiritish tartiblari Paskalda nima yoziladi

Terilgan fayllar uchun fayl komponentini o'zgaruvchiga o'qiydi.
Matnli fayllar uchun bir yoki bir nechta qiymatlarni bir yoki bir nechta o'zgaruvchilarga o'qiydi
Satr o'zgaruvchilari uchun:
O'qish keyingi qator oxiri belgisigacha yoki Eof (F) rost bo'lguncha barcha belgilarni o'qiydi. O'qish o'qigandan keyin keyingi qatorga o'tmaydi. Agar natijada olingan satr satr o'zgaruvchisining maksimal uzunligidan uzun bo'lsa, u kesiladi. Birinchi o'qishdan so'ng, har bir keyingi Read qo'ng'iroqlari oxiri belgisini ko'radi va nol uzunlikdagi qatorni qaytaradi.
Bir nechta satr qiymatlarini o'qish uchun ReadLn ga bir nechta qo'ng'iroqlardan foydalaning.
Kengaytirilgan sintaksis opsiyasi yoqilganda, Read protsedurasi null bilan yakunlangan satrlarni nullga asoslangan belgilar massivlarida o'qiy oladi.
Integer yoki Real tipidagi o‘zgaruvchilar uchun:
O‘qish raqamli qator oldidagi bo‘shliqlar, yorliqlar yoki satr oxiri belgilarini o‘tkazib yuboradi. Agar raqamli qator bo'lmasa
kutilgan formatga mos keladi, I/U xatosi yuzaga keladi, aks holda o'zgaruvchiga olingan qiymat tayinlanadi. Keyingi o'qish raqamli qatorni tugatgan bo'sh joy, yorliq yoki satr oxiri belgisi bilan boshlanadi.
Misol o'qish tartibi
WinCrt, WinDos-dan foydalanadi;
Var F: Matn;
Ch: Char;
Boshlash
(Fayl nomini dan oling buyruq qatori}
Tayinlash (F, ParamStr (1));
Qayta tiklash (F);
EOF bo'lmasa ham (F) qiling
Boshlash
O'qing(F, Ch);
Yozing (Ch); (Biz faylning mazmunini ekranda ko'rsatamiz)
Oxiri;
Oxiri.

• 
  Readln
  
• 
  Yozing
  
• 
  Yozilgan
  Подробнее: https://sukachoff.ru/uz/ustrojjstva/operatory-vvoda-dannyh-readln-i-read-operatory-read-i-readln-procedury-vvoda/
  

Readln dasturi shunchaki ekranni kechiktirish uchun emas. Uning asosiy vazifasi klaviaturadan ma'lumotlarni kiritishdir. Ushbu maqolada biz klaviaturadan raqamlarni qanday kiritishni va keyin ularni ekranda ko'rsatishni o'rganamiz. Buning uchun biz Var o'zgaruvchilarni tavsiflash bo'limi bilan, shuningdek Paskalda qo'llaniladigan ma'lumotlar tiplaridan biri bilan tanishishimiz kerak bo'ladi.

Dastur raqami 3; crt dan foydalanadi; var n: integer; boshlash clrscr; yozish (“Klaviaturadan raqamni kiriting:”); readln (n); writeln (“Siz raqam kiritdingiz”, n); readln end.
3-qatorda biz Var xizmat so'zini yozamiz. U o'zgaruvchilarni e'lon qilish uchun ishlatiladi. O'zgaruvchilar dasturni bajarish jarayonida o'zgarishi mumkin bo'lgan turli qiymatlar, raqamlar yoki so'zlardir. Klaviaturadan raqamlar yoki harflarni kiritganimizda, ular o'zgaruvchilarga yoziladi. Var so'zidan keyin biz bo'sh joy bilan ajratilgan o'zgaruvchi identifikatorini (ya'ni uning nomini o'zimiz o'ylab topamiz) ko'rsatamiz. O'zgaruvchilar xizmat so'zlari emas, dasturchi ularni o'zi belgilaydi. V Ushbu holatda biz bitta "n" o'zgaruvchisini o'rnatdik va bundan buyon faqat shu o'zgaruvchidan foydalanamiz. O'zgaruvchini yozgandan so'ng, ma'lumotlar turi ikki nuqta bilan ko'rsatiladi. Bir necha turdagi ma'lumotlar mavjud.Ulardan biri Integer. Bu bizning "n" o'zgaruvchimiz faqat -32768 dan 32767 gacha bo'lgan butun son bo'lishi mumkinligini dasturga aniq ko'rsatadi. Turli xil ma'lumotlar turlaridan foydalanish dasturni yozishda dasturchining o'ziga xos ehtiyojlariga bog'liq. Ushbu bosqichda eng muhimi, agar siz dasturingizda biron bir raqamdan foydalanmoqchi bo'lsangiz, buning uchun siz o'zgaruvchini (bizning holimizda "n") va ma'lumotlar turini (bizning holimizda Integer) ko'rsatishingiz kerakligini tushunishdir. .
7-qatorda biz Readln klaviaturasidan ma'lumotlarni kiritish uchun bayonot yozamiz. Ushbu bayonot o'rnatilgan ma'lumotlarni kiritish tartibini chaqiradi va shu nuqtada dastur to'xtaydi va ma'lumotlarni kiritishni kuta boshlaydi. Biz allaqachon bu operatordan ekranni kechiktirish uchun foydalanganmiz. Bu dasturda Readln operatoridan keyin qavs ichida "n" o'zgaruvchimiz ko'rsatilgan. Biz klaviaturadan kiritadigan raqam ushbu o'zgaruvchiga yoziladi. Shunga ko'ra, bu raqam o'zgaruvchining parametrlariga mos kelishi kerak, ya'ni. -32768 dan 32767 gacha bo'lgan oraliqda butun son bo'lishi kerak. Dastur 7-qatorga yetgandan so'ng "Klaviaturadan raqam kiriting:" xabarini ko'rsatadi va kutadi. Ushbu bosqichda biz biron bir raqamni kiritishimiz va Enter tugmasini bosishimiz kerak.
8-qator raqami. Bu erda biz Writeln ekraniga chiqish bayonotini yozamiz. Unda "Siz raqam kiritdingiz" xabari paydo bo'ladi va "n" o'zgaruvchimizning qiymati (ya'ni klaviaturadan kiritadigan qiymat) ham ko'rsatiladi. E'tibor bering, 8-qatorda biz "n" o'zgaruvchisi oldiga vergul qo'yamiz va o'zgaruvchining o'zi apostroflar ichiga qo'yilmaydi.
Endi Paskalda dasturni yozamiz.
Ishga tushirish (Ctrl + F9). Biz raqam yozamiz, masalan, 5 va Enter tugmasini bosing.
Dasturlar faqat bitta qatorda farqlanadi. Birinchi dastur o'z-o'zidan tushunarli - u 36 raqamini chop etadi. Ikkinchi dasturda hech bir joyda a va b nima ekanligi aytilmagan, lekin uning o'rniga ReadLn operatori kiritilgan. Keling, u haqida gapiraylik.
ReadLn "o'qish" qatorini o'qiydi, "o'qish liniyasi" ni tarjima qiladi.U kompyuterni to'xtatib turishni va odam klaviaturadan ma'lum ma'lumotlarni kiritishini kutishni va keyin ishlashni davom ettirishni aytadi.Xususan, ReadLn (a, b) ikki kutadi. kiritilishi kerak bo'lgan butun sonlar.
Shunday qilib, agar ishga tushirilgandan so'ng birinchi dastur oxirigacha to'xtamasdan va qiyinchiliksiz ishlasa, natijani bersa, ReadLn operatoridagi ikkinchi dastur to'xtaydi va kutadi. Ushbu kutish vaqtida odam klaviaturada 20 raqamini yozishi kerak (chunki ReadLn operatori ro'yxatidagi birinchi raqam a), keyin bo'sh joy tugmasini bosing, keyin 16 ni kiriting va Enter tugmasini bosing. Paskal bo'sh joy tugmachasini bosishni odamning klaviaturada bitta raqamni yozishni tugatganligi va endi boshqasini yozishni boshlashi haqidagi signali sifatida qabul qiladi. Klaviaturada oxirgi raqamni kiritganingizdan so'ng, raqamlarni kiritish belgisi sifatida Enter tugmasini bosishingiz kerak bu operator ReadLn tugadi va kompyuter ishlashni davom ettirishi mumkin. Shunga ko'ra, kompyuter Enter tugmasini bosgandan so'ng darhol kutishni to'xtatadi va birinchi navbatda xotiraga 20 raqamini a katakchaga va 16 raqamini b katakchaga yuboradi. Shu nuqtada, u ReadLn operatorining bajarilishini tugallangan deb hisoblaydi va keyingi bayonotga o'tadi - WriteLn. Bu 36 raqamini chop etadi.
Shunday qilib, ikkala dastur ham xuddi shunday qiladi. Nima uchun tayinlash operatori o'rniga ReadLn dan foydalaning? Axir, birinchi dastur aniqroq va u to'xtamasdan ishlaydi. Buning sabablaridan biri ReadLn-ga ega bo'lgan dastur ancha universal, "erkinroq": agar birinchi dastur faqat ikkita aniq raqamni qo'shish masalasini hal qilsa, ikkinchi dastur ikkita ixtiyoriy raqamni qo'shadi. Ikkinchi sabab, ReadLn-ga ega dastur dasturchiga dasturni yozish paytida dastlabki ma'lumotlarning o'ziga xos qiymatlari haqida o'ylamaslikka imkon beradi va dasturni bajarish vaqtida bu bosh og'rig'ini qoldiradi. Lekin asosiy sabab shuki, ReadLn odamga kompyuter bilan muloqot qilish, dastur ishlayotgan vaqtda u bilan muloqot qilish imkonini beradi.
Birinchi sababning ahamiyatini isbotlash uchun biz quyidagi muammoni hal qilish dasturini yozamiz: Hayvonot bog'ida uchta fil va juda ko'p quyon bor, quyonlar soni tez-tez o'zgarib turadi. Fil kuniga yuzta sabzi, quyon esa ikkitadan yeyishi kerak. Har kuni ertalab hayvonot bog'i xodimi kompyuterga quyonlarning sonini aytib beradi. Bunga javoban kompyuter vazirga bugungi kunda quyon va fillarga boqish kerak bo'lgan sabzi umumiy sonini aytishi kerak.
Keling, o'zgaruvchilar uchun nomlar bilan chiqamiz:
kol_krol - hayvonot bog'idagi quyonlar soni
kol_slon - hayvonot bog'idagi fillar soni
norma_krol - quyonda kuniga qancha sabzi bo'lishi kerak
norma_slon - filda kuniga qancha sabzi bo'lishi kerak
vsego - qancha sabzi talab qilinadi
Endi dastur yozamiz:
VAR kol_krol, kol_slon, norma_krol, norma_slon, vsego: Butun son;
norma_slon: = 100;
ReadLn (kol_krol);
vsego: = norma_krol * kol_krol + norma_slon * kol_slon;
Dasturni yozgandan so'ng, dasturchi uni kompyuterga kiritadi, disk raskadrovka qiladi va diskka yozadi. Bu uning missiyasini yakunlaydi. Ertalab xizmatkor quyonlarni sanab, ularning 60 tasi borligini bilib, kompyuter oldiga keladi va dasturni bajarish uchun ishga tushiradi.
Dastlabki ikkita operatorni (norma_krol: = 2 va norma_slon: = 100) avtomatik ravishda bajargan kompyuter ReadLn operatorida to'xtaydi. Xizmatchi 60 raqamini kiritadi, shundan so'ng kompyuter bu raqamni kol_krol yacheykasiga yuboradi va keyingi bayonotga o'tadi (kol_slon: = 3). Oxir-oqibat, javob monitorda paydo bo'ladi: 420.
Mana dastur oqimining sxematik diagrammasi: