День: Прибытие в Цюрих. Размещение в отеле.

Pprocedure Sector (X,Y:Integer;BegA, EndA,RX, RY:Word);

вычерчивает и заполняет эллипсный сектор. Здесь BegA, EndA – соответственно начальный и конечный углы эллипсного сектора. Остальные параметры обращения аналогичны параметрам процедуры FillEllipse.

Процедура

Procedure PieSlice (X,Y:Integer;BegA,EndA,R:Word);

вычерчивает и заполняет сектор окружности. В отличии от процедуры Sector, указывается лишь один радиус R, остальные параметры аналогичны параметрам процедуры Sector.

Вывод текста.

Описываемые ниже стандартные процедуры и функции поддерживают вывод текстовых сообщений в графическом режиме

Процедура

Procedure OutText (Text: String)

выводит текстовую строку Text, начиная с текущего положения указателя, в состветствии с установленным стилем и выравниванием (см. далее). Аналогичная процедура

Procedure OutTextXY (X,Y:Integer; Text:String)

выводит строку, начиная с заданного места. При этом указатель не меняет своего положения.

Процедура

Procedure SetTextStyle (Font, Direct, Size:Word)

устанавливает стиль текстового вывода на графический экран. Здесь Font – номер шрифта (от 1 до 10); Direct- код направления (HorizDir=0 – слева – направо; VortDir=1-снизу – вверх); Size – размер шрифта (от 1 до 10).

Процедура

Procedure SetTextJustify (Horiz, Vert: Word)

задает выравнивание выводимого текста по отношению к текущему положению указателя или к заданным координатам. Здесь Horiz – горизонтальное выравнивание;

Vert – вертикальное выравнивание. В качестве фактических параметров можно использовать следующие константы:

Const

LeftText = 0; {Указатель слева от текста}

CenterText = 1; {Симметрично слева и справа, сверху и снизу}

RightText = 2; {Указатель справа от текста}

BottomText; {Указатель снизу от текста}

TopText = 2; {Указатель сверху от текста}.

В некоторых случаях могут пригодиться функции

Function TextWidth(Txt:String):Word;

Function TextHeight(Txt:String):Word;

которые возвращают соответственно длину и высоту текста в пикселах выводимой текстовой строки с учетом текущего стиля вывода, заданного процедурой SetTextStyle.

Вопросы для самоконтроля.

1. Установление графического режима.

2. Контроль ошибок графических операций.

3. Координаты точек на экране.

4. Управление цветом.

5. Вывод на графический экран линий и точек.

6. Вывод многоугольников, дуг, окружностей, эллипсов.

7. Заполнение фрагментов графического экрана.

 

3. Задание.

Написать программу, которая выводит на графический экран план расположения дома, в котором Вы проживаете. На плане необходимо указать название улиц, административных и промышленных знаний (кинотеатров, ВУЗов, магазинов и т.д.), номера домов, а также остановки общественного транспорта и маршруты передвижения от них к дому.

 

4. Список литературы

1. Новичков В.С. «Алгоритмические языки в техникуме». – М.: Высшая школа, 1990. – 222 стр.

2. Боон К. «Паскаль для всех». – М.: Энергоатомиздат, 1988. – 188 стр.

3. Савельев А.Я. «Языки программирования» (Паскаль, ПЛ/М). – М.: Высшая школа, 1987. – 142 стр.

 

 

Содержание

Лабораторная работа №1. 1

Лабораторная работа №2. 14

Лабораторная работа №3. 24

Лабораторная работа №4. 30

Лабораторная работа №5. 32

Лабораторная работа №6. 37

Лабораторная работа №7. 44

Лабораторная работа №8. 49

Лабораторная работа №9. 52

Лабораторная работа № 10. 57

 

день: Прибытие в Цюрих. Размещение в отеле.

Рекомендуем бронировать рейс SWISS LX 1325.
Город возможностей – у воды, с великолепным видом на заснеженные вершины Альп до горизонта, Цюрих в Швейцарии, предлагает уникальное сочетание достопримечательностей и развлечений – больше 50 музеев и более 100 галерей, международные модные марки и работа местных дизайнеров.

Ночь – в Цюрихе в отеле 3-4* в центре

Рекомендации:
• Kunsthaus – в самой важной художественной галерее Швейцарии представлена коллекция из всех ключевых периодов европейского искусства - от средневековья до наших дней.
• Bahnhofstrasse – улица длиной в милю с эксклюзивными модными бутиками, универмагами и уличными кафе – надолго пленяет прохожих.
• Зоопарк Цюриха – уникальная экосистема на площади в 11 000 квадратных метров, где содержатся несколько сотен видов растений и животных из тропических лесов Мадагаскара.
• Старый город – с его художественными галереями, антикварными и книжными магазинами. Рекомендуется для любителей искусства. Вечером Старый Город превращается в развлекательный квартал с эклектичной смесью посетителей.