Бүгүн, эч кандай графикалык жана үн эффекттери жок жөнөкөй оюндар кайрадан жаралууда. Аларды ойнотуп, колдонуучу көркөм ыкмаларга эмес, сюжетке көңүл бурат. Мындай оюндарды түзүүгө Паскаль тили жакшы ылайыктуу.
Нускамалар
1 кадам
Паскаль компиляторун кийинки беттен жүктөп алыңыз - https://edn.embarcadero.com/article/20803. Сураныч, ушул программалык топтомдун колдонуу шарттарын окуп чыгып, аны орнотуп алыңыз
2-кадам
Оюнчудан 0дон 100гө чейинки аралыктагы санды табышы керек болгон оюн түзүп көрүңүз. Алгач программанын атын киргизиңиз: program ugadayka;
3-кадам
CRT бирдигин туташтырыңыз: crt колдонот;
4-кадам
Өзгөрмөлөрүңүздү төмөнкүдөй белгилеңиз: var
загадка, мнение, попытки: бүтүн сан;
knopochka: char
5-кадам
Программаны экранды жана өзгөрүлмө нерселерди тазалап, жашырылган номерге псевдо-кокустук маани берип баштаңыз:
clrscr;
рандомизациялоо;
popytki: = 0;
mnenie: = 0;
загадка: = int (rnd * 100);
6-кадам
Компьютер колдонуучудан болжолдонгончо, анын жашырылган номери эмне экендигин сураңыз: while not mnenie = zagadka do
баштоо
popytki: = popytki + 1;
writeln ('Аракет номери', popytki, '.');
write ('Сиздин оюңузча, кандай сан ойлонуштурулган?');
readln (mnenie);
if zagadka> mnenie then writeln ('Жок, катылган сан чоңураак!')
else writeln ('Жок, жашырылган сан азыраак!')
аягы;
7-кадам
Номер болжолдонгондон кийин, жогорудагы окуялардын автоматтык түрдө кайталанышы токтойт. Программанын кийинки саптары аткарыла баштайт. Аларда колдонуучу номерди болжолдогон маалыматты машинада көрсөтүңүз: Writeln ('Куттуктайбыз! Сиз', popytki, 'санын сынап санды таптыңыз. Бул чындыгында', zagadka, '.');
knopochka: = readkey
8-кадам
Программаны аяктоо үчүн билдирүүнү киргизиңиз: end.
9-кадам
Программаны каалаган аталышта меню элементтеринин файлын колдонуп -> Save as деп сактаңыз. Келечекте, ар бир түзөтүүдөн кийин, F2 баскычын басуу менен сактап коюңуз.
10-кадам
Программаны аткарууга баштоо үчүн, Control жана F9 баскычтарын бир эле учурда басыңыз.
11-кадам
Программа чыккандан кийин, анын экранда эмнени чагылдыргандыгын көрүү үчүн, бир эле учурда alt="Image" жана F5 баскычтарын басыңыз. Редакторго кайтуу үчүн ушул эле баскыч айкалышын дагы бир жолу басыңыз.