Отримання випадкових чисел Random

Оператор очистки екрану Clrscr;

End.

Begin

………………..

Наведемо список основних процедур модуляCRT.

Оператор вимагає підключення (Uses CRT;) модуля CRT, наприклад:

Uses CRT;

Begin

Clrscr;

……….

End.

2. Оператор переміщення текстового курсору в заданий символ x рядка y goto xy(x,y)

(1<=x<=80, 1<=y<=25)

3. Оператор зміни фона екрана (колір фона) Textbackground(...);

Щоб очистився весь екран, після оператора textbackground має слідувати оператор clrscr. В зворотньому випадку фон змінюється тільки під поточним рядком.

4. Оператор зміни кольору переднього плану (колір букв) Textcolor(...);

Наприклад,

Uses crt;

Begin

Textbackground (yellow);

clrscr;

…

Textcolor(blue); … End.

Номер	Константа модуля Crt	Колір
	Black	чорний
	Blue	синій
	Green	зелений
	Cyan	голубий
	Red	червоний
	Magenta	фіолетовий
	Brown	Коричневий
	LightGray	Яскраво-сірий
	DarkGray	Темно-сірий
	LightBlue	Яскраво-синій
	LightGreen	Яскраво-зелений
	LightCyan	Яскраво-голубий
	LightRed	рожевий
	LightMagenta	бузковий
	Yellow	жовтий
	White	білий
	Blink	Блимання символу

5. Delay(Ms) – затримка виконання програми на вказаний у мілісекундах інтервал часу (спробуйте Delay(200)).

6. Sound (Hz)– увімкнення звукового сигналу вказаної частоти у герцах.

7. Nosound– відключення звукового сигналу.

8. KeyPressed – повертає значення true, якщо натиснута будь-яка клавіша, та false – у протилежному випадку.

9. Оператор очікування натискання на клавішу Readkey;

Використовується для затримки зображення на екрані до натискання на клавішу (Enter). Можна ставити в кінці програми перед end.

Random(X) – отримання випадкових цілих чисел в діапазоні від 0 до (Х-1). Аргумент Х - ціле. Наприклад, Y :=Random(39); (змінній Y присвоюється значення, що рівне числу із проміжка від 0 до 38).

- Randomize – формування бази випадкових чисел, на основі часового таймера ПК. забезпечує генерацію неповторюючих послідовностей випадкових чисел. Використовується, щоб отримати різні випадкові числа при кожному запуску програми повинен стояти в програмі до першого використання функції Random.

Генерація випадкових чисел (А)
Що треба отримати	Дано	Оператор	Результат (А)
Будь-яке число від 0 до 90	Аргумент - 91	А : = Random(91);	Будь-яке число від 0 до 90, наприклад 62
Двозначні цілі додатні числа	Числа від 10 до 99, всього: 99-10+1=90 (числа).	А : = Random(90)+10;	Будь-яке число від 10 до 99, наприклад 12
Двозначні цілі додатні парні числа	Числа 10, 12, 14, … до 98, всього чисел (98-10)/2+1=88/2+1=45.	А : = Random(45)*2+10;	Отримане число від 0 до 44, множаться на 2 і збільшуются на 10. Наприклад, 56
Числа в заданому проміжку із заданим кроком	N – початок проміжка, M - кінець проміжка, крок - К.	А : = Random (((N–M) div K)+1)*К+N;	Згенеруємо випадкове число в проміжку від 0 до (N – M) div k. Множимо на К і додаємо N.

Читайте також:

<== попередня сторінка	\|	наступна сторінка ==>
	\|	ПРАВИЛА ОФОРМЛЕНЬ СКЛАДАЛЬНИХ КРЕСЛЕНЬ

Не знайшли потрібну інформацію? Скористайтесь пошуком google:

Генерація сторінки за: 0.003 сек.