Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Паскаль для учеников.doc
Скачиваний:
0
Добавлен:
25.12.2019
Размер:
1.03 Mб
Скачать
  1. Графические примитивы

  • MoveTo(x,y)

– перемещение указателя в точку с координатами (x, y)

  • PutPixel(x,y,z)

– вывод точки (z – цвет)

  • Line(xl,yl,x2,y2)

– отрезок с заданными координатами конца и начала.

  • RecTangle(xl,yl,x2,y2)

– xl,yl,x2,y2 - координаты концов главной диагонали прямоугольника

  • Bar(xl,yl,x2,y2)

– закрашенный прямоугольник цветом и стилем, определенными раньше

  • Circle(x,y,r)

– окружность радиусом r

  • Ellipse(x,y;ul,u2;xr,yr)

х,у – центр эллипса; ul,u2 – угол. Отсчитывает против часовой стрелки и указывается в градусах; дуга вычерчивается от заданного начального угла ul до конечного u2 ; xr, yr – полуоси.

  • FloodFill(x,y,z)

– заполнение внутренней или внешней области замкнутой фигуры стилем, заданным процедурой SetFillStyle ранее, (х, у) – точка внутри или снаружи фигуры, z - цвет.

  • Delay(x)

– установка паузы перед выполнением следующей команды в миллисекундах. 1 секунда = 1000 миллисекунд.

  • x:=GetMaxX

– определение максимального значения по оси ОХ

  • y:=GetMaxY

– определение максимального значения по оси OY

Пример

Нарисовать возникающую из центра экрана окружность, увеличивающуюся и меняющую цвет от 0 до 15 с шагом 5 до границы экрана.

program circ;

uses graph, crt;

var driver, mode, i, с : integer;

begin

clrscr;

initgraph (driver, mode, ' c: \bp\bgi ');

while i<=400 do begin

inc (c) ;

if c=16 then c:=l;

setcolor (c) ;

circle (320, 240, i) ;

delay(l000) ;

setcolor (0) ;

circle (320, 240, i) ;

i:=i+5;

end;

closegraph;

readln;

end.

Активация графического модуля

Переход в графический режим экрана

с – цвет очередного круга

Закрытие видеорежима

Вопросы для самостоятельной работы

  1. Чем характеризуется экран, находящийся в графическом режиме?

  2. Как осуществляется переход в графический режим? Какие нюансы при этом надо учитывать?

  3. Какие основные действия возможны в графическом режиме?

  4. Как обозначаются цвета в Паскале?

  5. С помощью каких команд задается цветовое оформление в Паскале?

  6. Какие еще варианты цветового оформления, кроме заливки цветом, существуют?

  7. Какие геометрические фигуры можно изобразить в Паскале? Как они задаются?

  8. Как задается цвет контура фигуры; цвет и стиль заливки?

  9. Какая команда позволяет пользователю увидеть результат программы, т. е. задерживает на некоторое время выполнение инструкций программы?

Задачи

Уровень A

    1. Написать программу, которая вычерчивает на экране домик.

    1. Написать программу, которая выводит на экран флаг Олимпийских игр. Изображение флага приведено ниже (одной клетке соответствует пять пикселов).

    1. Написать программу, которая вычерчивает на экране кораблик.

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

    2. Написать программу, которая вычерчивает на экране шестиугольник.

    3. Написать программу, которая рисует на экране Государственный флаг России.

    4. Написать программу, которая рисует на экране веселую рожицу желтого цвета.

    1. Написать программу, которая выводит на экран узор, изображенный ниже.

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

    1. Написать программу, которая выводит изображенный ниже узор, причем сначала появляются красные, а затем – синие квадраты.

Уровень B

    1. Написать программу, которая выводит на экран изображение шахматной доски с заданной стороной клетки.

    2. Написать программу, которая выводит на экран точечный график функции у = 0,5х2 + 4х — 3. Диапазон изменения аргумента — от —15 до 5, шаг аргумента — 0,1. График вывести на фоне координатных осей, точка пересечения которых должна находиться в центре экрана.

    3. Написать программу, которая рисует окружность, движущуюся по экрану.

    4. Написать программу, которая выводит на экран диаграмму успеваемости учеников класса, например, по итогам контрольной работы. Исходные данные следует ввести в алфавитно-цифровом режиме работы.

    1. Написать программу, которая выводит круговую диаграмму, отражающую товарооборот (в процентах) книжного магазина. Исходные данные (объем продаж в рублях по категориям: книги, журналы, открытки и канцтовары) вводятся во время работы профаммы.

    1. Написать программу, которая выводит на экран изображение работающего светофора. Рекомендуемый вид светофора и алгоритм его работы приведены ниже.

Уровень C

    1. Написать программу, которая вычерчивает на экране ломанную линию, состоящую из 200 звеньев, окрашенных в разные цвета, выбираемые случайным образом, причем координаты звеньев тоже выбираются случайно.

    2. Написать программу, которая выводит на экран изображение идущих часов, имеющих секундную и минутную стрелки.

    3. Написать программу, которая выводит на экран график функции у — 2 Sin(x) е*/5.

    4. Написать программу, которая выводит на экран контур пятиконечной звезды.

  1. Работа с файлами

  2. с расширением txt

Работа с файлами происходит в несколько этапов, для каждого из которых существует специальная функция.

  1. Установление связи с файлом

Файл связывается с программой через переменную типа text (integer, char).

assign(<переменная>, 'полный путь к файлу');

  1. Определение цели открытия файла