Bugungi kunda grafik yoki tovush effektlari bo'lmagan oddiy o'yinlar qayta tug'ilishni boshdan kechirmoqda. Ularni o'ynab, foydalanuvchi badiiy texnikaga emas, balki syujetga e'tibor qaratadi. Bunday o'yinlarni yaratish uchun Paskal tili juda mos keladi.
Ko'rsatmalar
1-qadam
Paskal kompilyatorini quyidagi sahifadan yuklab oling - https://edn.embarcadero.com/article/20803. Iltimos, ushbu dasturiy ta'minot to'plamidan foydalanish shartlarini o'qing va keyin uni o'rnating
2-qadam
O'yinchi yaratishga harakat qiling, unda o'yinchi 0 dan 100 gacha bo'lgan raqamni taxmin qilishi kerak. Dastlab dastur nomini kiriting: program ugadayka;
3-qadam
CRT birligini ulang: crt dan foydalanadi;
4-qadam
O'zgaruvchilaringizni quyidagicha belgilang: var
zagadka, mnenie, popytki: integer;
knopochka: char
5-qadam
Dasturni ekranni va o'zgaruvchilarni tozalab, yashirin raqamga psevdo-tasodifiy qiymat berib boshlang: start
clrscr;
tasodifiy qilish;
popytki: = 0;
mnenie: = 0;
zagadka: = int (rnd * 100);
6-qadam
Kompyuterdan foydalanuvchiga, uning fikriga ko'ra, yashirin raqam nima ekanligini taxmin qilgunicha so'rang: while not mnenie = zagadka do
boshlash
popytki: = popytki + 1;
writeln ('Sinov raqami', popytki, '.');
write ('Nima deb o'ylaysiz, qaysi raqam o'ylab topilgan?');
readln (mnenie);
agar zagadka> mnenie then Writeln ('Yo'q, yashirin raqam kattaroq!')
else writeln ('Yo'q, yashirin raqam kamroq!')
oxiri;
7-qadam
Raqam taxmin qilingandan so'ng, yuqoridagi voqealarni avtomatik takrorlash to'xtaydi. Dasturning keyingi satrlari bajarila boshlanadi. Ularda foydalanuvchi raqamni taxmin qilgani haqida ma'lumotni mashinada namoyish eting: writeln ('Tabriklaymiz! Siz raqamni', popytki, 'raqamini sinab topgansiz. Bu haqiqatan ham teng', zagadka, '.');
knopochka: = o'qish tugmasi
8-qadam
Dasturni tugatish uchun bayonotni kiriting: tugatish.
9-qadam
Menyu elementlari fayli yordamida dasturni istalgan nom ostida saqlang -> Save as. Kelajakda har bir tahrirdan so'ng uni F2 tugmachasini bosib saqlang.
10-qadam
Dasturni bajarish uchun boshlash uchun bir vaqtning o'zida Control va F9 tugmalarini bosing.
11-qadam
Dastur tugagandan so'ng, avvalgi ekranda nimani ko'rsatishini ko'rish uchun bir vaqtning o'zida alt="Image" va F5 tugmachalarini bosing. Tahrirlovchiga qaytish uchun yana bir xil tugmalar birikmasini bosing.