§ 28 Линейные массивы и работа с графикой на языке Pascal Глава 3. Программирование на языках JavaScript и Pascal

Линейный массив в языке Pascal Описание массива: var mas : array [ ] of real; mm1 : array [ ] of string; Массив mas из 20 вещественных чисел; индексы элементов – от 1 до 20 Массив mm1 из 10 строк; индексы элементов – от 0 до 9 Описание массива и задание начальных значений: var mas : array [ ] of integer := (1, 2, 3, 4, 5, 6, 7, 8, 9, 10); m : array [ ] of string := ('зима', 'весна', 'лето', 'осень');

Модуль – внешний файл, написанный на языке Pascal, содержащий описания констант, процедур и функций и подключаемый к программам пользователя Модуль для работы с графикой: uses GraphABC; Модуль GraphABC в системе PascalABC.NET служит для обеспечения работы с графическими операторами Служебное слово uses в языке Pascal служит для указания подключаемых модулей

Рисование отрезка прямой линии Line (x1,y1,x2,y2); Координаты концов отрезка (целые числа) (x1, y1) (x1, y1)

Рисование прямоугольника Rectangle (x1,y1,x2,y2); Координаты верхнего левого и нижнего правого углов прямоугольника (целые числа) (x1, y1) (x1, y1)

Рисование окружности Circle (x,y,r); Координаты центра и радиус (r) окружности (целые числа) (x, y) r

Рисование дуги окружности Arc (x,y,r,ang1,ang2); Координаты центра, радиус (r), начальный (ang1) и конечный (ang2) углы дуги (в градусах) (x, y) r ang1ang2

Рисование сектора круга Pie (x,y,r,ang1,ang2); Координаты центра, радиус (r), начальный (ang1) и конечный (ang2) углы дуги (в градусах) (x, y) r ang1ang2

Задание цвета рисования линий SetPenColor (col); Символическое имя цвета Цвет ИмяЦвет Имя черный clBlack голубой clSkyBlue красный clRedфиолетовый clPurple зеленый clGreen коричневый clBrown желтый clYellow серебряный clSilver синий clBlue белый clWhite

Задание цвета закрашивания фона FloodFill (x,y,col); (x,y) – координаты точки начала закрашивания, col – символическое имя цвета Цвет ИмяЦвет Имя черный clBlack голубой clSkyBlue красный clRedфиолетовый clPurple зеленый clGreen коричневый clBrown желтый clYellow серебряный clSilver синий clBlue белый clWhite

Толщина линии SetPenWidth (w); Толщина линии в пикселях (целое число) Cтиль линии SetPenStyle (p); Условное название стиля линии Стиль линии Вид линии Обозначение сплошная psSolid штриховая psDash пунктирная psDot

Построение графиков функций x x1x1 x2x2 x3x3 x4x4 x5x5 x6x6 x7x7 x8x8 x9x9 f(x 1 ) f(x 2 ) f(x 3 ) f(x 4 ) f(x 5 ) f(x 6 ) f(x 7 ) f(x 8 ) f(x 9 ) y

Изменение положения начала системы координат и направления оси Y. Масштабирование. x y Экранная система координат (0,0) x y Новая система координат (x0,y0) (x,y)(x,y) Вычисленные координаты точки (в новой системе координат) xg := x0 + ms * x; yg := y0 – ms * y; // ms – коэффициент масштаба (xg,yg) Построение графиков функций

Вопросы и задания 1. Опишите способ задания линейного массива в программе на языке Pascal. 2. Какими способами задают значения элементов массива? 3. Дан массив из 10 чисел. Составьте программу, которая выводит два самых больших по модулю элемента этого массива. 4. Дан массив названий месяцев. Составьте программу, которая выводит на экран названия, включающие буквы «а» и «д». 5. Каким способом подключаются к программе на языке Pascal внешние файлы, написанные на языке Pascal?

Вопросы и задания 6. Какой модуль используется в программах на языке Pascal для работы с графикой? 7. Опишите систему координат графического окна системы PascalABC.NET. 8. Опишите графические примитивы языка Pascal. 9. Почему в программе program88. pas для вычисления значений переменных xg, yg в арифметическом выражении используется функция Round() ? 10. Составьте программу для изображения трех пересекающихся окружностей с закраской областей в разные цвета.

Вопросы и задания 11. Составьте программу штриховки квадрата под углом 45º. 12. Составьте программу построения штриховой линией графика функции y = x 2 – 3 на отрезке [–3, 3]. 13. Составьте программу построения в одном окне двумя цветами графиков функций y = 2x 3 и y = 1/(x 2 + 1) на отрезке [–3, 4].