setcolor процедури, ред

В допълнение към дейността на умножение и допълнение през различни операции се извършват целочислени Div (операция число деление), Mod (изчисление на остатъка от делене цяло число), операция на изваждане "-".

Тип на данните String (тип низ), използвани в Pascal за текстообработка. Ако само един символ, можете да запишете до 255 символа в променлива от тип String могат да бъдат написани на променлива от тип Char.

Ние вече знаем, какви са функциите за цели числа. Това е - да намерите номера на модула (функция ABC), както и изграждането на квадрат (функцията пл) ​​на. В този урок ще разгледаме функциите, които се прилагат към дробно число. Тя пл функции - кв.

В този урок ще научите как да чертаете линии в графичен режим, и да зададете цвят на линиите. Line графично режим Паскал се задава чрез процедура на линия. и неговия цвят - използване setcolor процедура.

Setcolor процедура, Line.

№2 низ. Свързване на CRT модул и графиката.

Редове №3 - №16. Ето, как да започнете режима на графики се записва. Тази процедура ние подробно на урок "инициализация графичен режим" и уточни, че всеки път, когато използвате тази процедура просто като копирате и да я поставите в желаната програма.

В съответствие №17 започва основната програма. Започнете веднага след думите, написани име процедура, която свързва графика «Graphinterface» режим.

String №19 напише процедура Randomize.

String №20. Тук започва цикъл, който ще работи толкова дълго, колкото и да е клавиш (линия №24) е натиснат.

В съответствие №21 Setcolor съхранена процедура, която определя цвета на линиите. Процедурата има обща форма setcolor (х), където х - № цвят. Color ще се генерира на случаен принцип с помощта на случайни функция, т.е. ще има стойност от 1 до 15. По-долу е таблица с цветове в режим на графика Pascal и съответните им кодове.

setcolor процедури, ред

В съответствие №22 писмена процедура линия, която тегли чертата. Неговият общ вид: линия (x1, y1, x2, y2), където x1, y1 - координати на началото на сегмента, и x2, y2 - координатите на крайния сегмент. Като вземем координатите на случайно генерирано число между 1 и 200.
Защото setcolor линия процедури и ще се изпълнява в една линия (линия №20 и №24) ние сме на екрана ще се появи линии с различни цветове и с различни координати.

setcolor процедури, ред

setcolor процедури, ред