Процедури управління розташуванням інформації на екрані

Екран комп'ютера у текстовому режимі має 24 рядка, кожний з яких вміщає 80 символів. Інформація виводиться, починаючи з лівого верхнього кута екрану.

Для виведення інформації в будь-яку точку екрану використовується процедура

GoToXY( x, y ); де x – номер стовпця (0 -79), y – номер рядка (0 -23).

Процедури роботи з кольором

Екран у текстовому режимі має дві характеристики кольору: поточний колір тексту, що виводиться та поточний фон. За замовчуванням – це білі символи на чорному фоні.

Для зміни кольору тексту використовується процедура TextColor(номер кольору);

Для зміни кольору фону використовується процедура TextBackGround(номер кольору);

Ці процедури можна використовувати при підключенні стандартного модуля Crt. (Команда Uses Crt;)

Колір	Номер	Константа модуля CRT
Чорний	0	Black
Синій	1	Blue
Зелений	2	Green
Морської хвилі	3	Cyan
Червоний	4	Red
Фіолетовий	5	Magenta
Коричневий	6	Brown
Світло-сірий	7	LightGray

Колір	Номер	Константа модуля CRT
Темно-сірий	8	DarkGray
Світло-синій	9	LightBlue
Світло-зелений	10	LightGreen
Світлий морської хвилі	11	LightCyan
Cвітло-червоний	12	LightRed
Світло-фіолетовий	13	LightMagenta
Жовтий	14	Yellow
Білий	15	White

Хід роботи

1. Запустити програму Turbo Pascal.

2. Створити спочатку на папері, а потім у пам’яті комп'ютера програму з іменем Vvod_1, яка б виконувала такі дії: а) введення з клавіатури значень х1=11, х2=22, х3=33, х4=44, х5=55; б) виведення слова Rezultat; в) виведення у наступному рядку всіх значень змінної х у вигляді: 1122334455; г) виведення у наступному рядку всіх значень змінної х у вигляді: 11 22 33 44 55; д) виведення у наступному рядку всіх значень змінної х у стовпчик.

3. Відлагодити програму, починаючи з пункту а), поступово додаючи пункти б), в), г), д).

4. Створити спочатку на папері, починаючи з блок-схеми, а потім у новому вікні програму з іменем Vvod_2 , яка б виконувала такі дії: а) введення з клавіатури значень змінних a,b,c ; б) знаходження суми та добутку введених чисел; г) виведення слова Rezultat; д) виведення результату у вигляді: a+b+c= сума a*b*c= добуток

5. Відлагодити програму з такими значеннями: a=1; b=2; c=3; a=12; b=13; c=14; a=100; b=56; c=45;

6. Зберегти створені програми на магнітному диску у робочому каталозі з іменами, які співпадають з назвами програм.

7. Закрити вікно з програмою Vvod_1, залишивши на екрані текст програми Vvod_2.

8. Вдосконалити програму Vvod_2, обчисливши значення виразу (a-b)/(c-a) та розмістивши результати обчислення червоним та зеленим кольором у центрі екрану.

9. Закінчити роботу з програмою Turbo Pascal.

Додаткове завдання

Записати фрагмент програми, що дає змогу вивести значення двох дійсних величин в один рядок, відокремивши їх крапкою з комою. Після другої величини вивести знак оклику.