Презентация, доклад на тему Графика в PascalABC

Содержание

Подключение дополнительных библиотекДля работы в графическом режиме необходимо подключение модуля GraphABC. Первой инструкцией программы должна быть инструкция uses GraphABC;ВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 1Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература
Графика в PascalABC

ВведениеГраф. примитивыЦвет--стильТекстЛитератураГрафика в PascalABC

Слайд 2Подключение дополнительных
библиотек
Для работы в графическом режиме необходимо подключение модуля GraphABC.

Первой инструкцией программы должна быть инструкция
uses GraphABC;

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Подключение дополнительных библиотекДля работы в графическом режиме необходимо подключение модуля GraphABC. Первой инструкцией программы должна быть инструкция

Слайд 3Графический режим
Графический экран PasсalABC (по умолчанию) содержит 640 точек по горизонтали

и 400 точек по вертикали.

Начало отсчета – левый верхний угол экрана

400 точек

640 точек

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

(0;0)

х

у

Графический режимГрафический экран PasсalABC (по умолчанию) содержит 640 точек по горизонтали и 400 точек по вертикали.Начало отсчета

Слайд 4Управление экраном
SetWindowWidth(w) –
Устанавливает ширину графического окна;
SetWindowHeight(h) -
Устанавливает высоту

графического окна;

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Управление экраномSetWindowWidth(w) – Устанавливает ширину графического окна; SetWindowHeight(h) - Устанавливает высоту графического окна; ВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 5Очистка графического окна
ClearWindow; - очищает графическое окно белым цветом.
ClearWindow(color); - очищает

графическое окно указанным цветом.

program clear;
uses GraphABC;
begin
ClearWindow;
ClearWindow(clMoneyGreen);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Очистка графического окнаClearWindow; - очищает графическое окно белым цветом.ClearWindow(color); - очищает графическое окно указанным цветом.program clear;uses GraphABC;

Слайд 6Графические примитивы
Точка
Линия
Прямоугольник
Окружность
Эллипс
Сектор
Дуга
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Графические примитивыТочкаЛинияПрямоугольник ОкружностьЭллипсСекторДугаВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 7Точка
SetPixel(x,y,color) - Закрашивает один пиксел с координатами (x,y) цветом color
program tochka;
uses

GraphABC;
begin
SetPixel(300,200,clred);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

(300, 200)

ТочкаSetPixel(x,y,color) - Закрашивает один пиксел с координатами (x,y) цветом colorprogram tochka;uses GraphABC;beginSetPixel(300,200,clred);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература(300, 200)

Слайд 8Линии
LineTo(x,y) - рисует отрезок от текущего положения пера до точки (x,y);

координаты пера при этом также становятся равными (x,y).

Program liniay;
uses GraphABC;
begin LineTo(300,200);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

ЛинииLineTo(x,y) - рисует отрезок от текущего положения пера до точки (x,y); координаты пера при этом также становятся

Слайд 9Линии
Line(x1,y1,x2,y2) - рисует отрезок с началом в точке (x1,y1) и концом

в точке (x2,y2).

Program liniay;
uses GraphABC;
begin
line(100,50,500,250);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

ЛинииLine(x1,y1,x2,y2) - рисует отрезок с началом в точке (x1,y1) и концом в точке (x2,y2). Program liniay; uses

Слайд 10Используемые цвета
Random(16777215) – случайный цвет из всей палитры цветов Паскаля
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Используемые цветаRandom(16777215) – случайный цвет из всей палитры цветов ПаскаляВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 11Цвет линии
SetPenColor(color) - устанавливает цвет пера, задаваемый параметром color.
Program liniay;
uses GraphABC;
begin

setpencolor(clred);
line(30,30,400,350);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Цвет линииSetPenColor(color) - устанавливает цвет пера, задаваемый параметром color.Program liniay;uses GraphABC;begin setpencolor(clred); line(30,30,400,350);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 12Толщина линии
SetPenWidth(n) - устанавливает ширину (толщину) пера, равную n пикселям.
Program

liniay;
uses GraphABC;
begin
setpenwidth(20);
setpencolor(clred);
line(30,30,400,350);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Толщина линииSetPenWidth(n) - устанавливает ширину (толщину) пера, равную n пикселям. Program liniay;uses GraphABC;beginsetpenwidth(20);setpencolor(clred);line(30,30,400,350);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 13Треугольник
Рисуется процедурами
Line(x1,y1,x2,y2); LineTo(x,y);
Program treugolnik;
uses GraphABC;
begin
setpenwidth(20);
setpencolor(clred);
line(300,100,500,300);
lineto(100,300);

lineto(300,100);
floodfill(300,200,clgreen);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

ТреугольникРисуется процедурами Line(x1,y1,x2,y2); LineTo(x,y); Program treugolnik;uses GraphABC;begin setpenwidth(20); setpencolor(clred); line(300,100,500,300); lineto(100,300); lineto(300,100); floodfill(300,200,clgreen);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 14Прямоугольник
Rectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2).
Program

pryamougolnik;
uses GraphABC;
begin
Rectangle(50,50,200,200);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

ПрямоугольникRectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2).Program pryamougolnik;uses GraphABC;beginRectangle(50,50,200,200);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 15Заливка цветом
FloodFill(x,y,color) - заливает область одного цвета цветом color, начиная с

точки (x,y).

Program pryamougolnik;
uses GraphABC;
begin
Rectangle(50,50,200,200);
FloodFill(100,100,clBlue);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Заливка цветомFloodFill(x,y,color) - заливает область одного цвета цветом color, начиная с точки (x,y).Program pryamougolnik;uses GraphABC;begin Rectangle(50,50,200,200); FloodFill(100,100,clBlue);end.ВведениеГраф.

Слайд 16Цвет и толщина контура
Задаются процедурами
SetPenWidth(w);
SetPenColor(color);
Program pryamougolnik;
uses GraphABC;
begin
SetPenColor(clred);
SetPenWidth(20);

Rectangle(50,50,200,200);
FloodFill(100,100,clBlue);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Цвет и толщина контураЗадаются процедурами SetPenWidth(w); SetPenColor(color);Program pryamougolnik;uses GraphABC;begin SetPenColor(clred); SetPenWidth(20); Rectangle(50,50,200,200); FloodFill(100,100,clBlue);end.ВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 17Окружность
Circle(x,y,r) - рисует окружность с центром в точке (x,y) и радиусом

r.

Program circle;
uses GraphABC;
begin
Circle(500,200,100);
FloodFill(500,200,clred);
end.

x1,y1

r

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

ОкружностьCircle(x,y,r) - рисует окружность с центром в точке (x,y) и радиусом r. Program circle;uses GraphABC;begin Circle(500,200,100);

Слайд 18Эллипс
Ellipse(x1,y1,x2,y2) - рисует эллипс, заданный своим описанным прямоугольником с координатами противоположных

вершин.

Program oval;
uses GraphABC;
begin
Ellipse(50,50,200,350);
FloodFill(50+100,50+100,clred);
Ellipse(250,150,550,300);
FloodFill(250+100,150+100,clBlue);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

ЭллипсEllipse(x1,y1,x2,y2) - рисует эллипс, заданный своим описанным прямоугольником с координатами противоположных вершин.Program oval;uses GraphABC;begin Ellipse(50,50,200,350); FloodFill(50+100,50+100,clred); Ellipse(250,150,550,300);

Слайд 19Дуга окружности
Arc(x,y,r,a1,a2) - рисует дугу окружности с центром в точке (x,y)

и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки).

Program duga;
uses GraphABC;
Begin
SetPenWidth(10);
Arc(300,250,150,45,135);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Дуга окружностиArc(x,y,r,a1,a2) - рисует дугу окружности с центром в точке (x,y) и радиусом r, заключенной между двумя

Слайд 20Сектор
Pie(x,y,r,a1,a2) - рисует сектор окружности, ограниченный дугой (параметры процедуры имеют тот

же смысл, что и в процедуре Arc).

Program sector;
uses GraphABC;
begin
Pie(300,200,100,0,90);
FloodFill(310,190,clpink);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

СекторPie(x,y,r,a1,a2) - рисует сектор окружности, ограниченный дугой (параметры процедуры имеют тот же смысл, что и в процедуре

Слайд 21Вывод текста в графическое окно
TextOut(x,y,’строка’); - выводит строку текста в позицию

(x,y) (точка (x,y) задает верхний левый угол прямоугольника, который будет содержать текст).

Program text;
uses GraphABC;
begin
TextOut(100,30,'Квадрат');
Rectangle(50,50,200,200);
FloodFill(55,55,clBlue);
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Вывод текста в графическое окноTextOut(x,y,’строка’); - выводит строку текста в позицию (x,y) (точка (x,y) задает верхний левый

Слайд 22Действия со шрифтом
SetFontName(‘name’) – устанавливает наименование шрифта.
SetFontColor(color) - устанавливает цвет шрифта.
SetFontSize(sz)

– устанавливает размер шрифта в пунктах.
SetFontStyle(fs) - устанавливает  стиль шрифта.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Действия со шрифтомSetFontName(‘name’) – устанавливает наименование шрифта.SetFontColor(color) - устанавливает цвет шрифта.SetFontSize(sz) – устанавливает размер шрифта в пунктах.SetFontStyle(fs)

Слайд 23Название шрифта
По умолчанию установлен шрифт, имеющий наименование MS Sans Serif.
Наиболее

распространенные шрифты – это Times, Arial и Courier New.
Наименование шрифта можно набирать без учета регистра.

Пример:
SetFontName(‘Times’);

Введение

Граф.
примитивы

Цвет--стиль

Операторы

Практика

Название шрифтаПо умолчанию установлен шрифт, имеющий наименование MS Sans Serif. Наиболее распространенные шрифты – это Times, Arial

Слайд 24Стиль шрифта
Задается именованными константами:
fsNormal – обычный;
fsBold – жирный;
fsItalic –

наклонный;
fsBoldItalic – жирный наклонный;
fsUnderline – подчеркнутый;
fsBoldUnderline – жирный подчеркнутый;
fsItalicUnderline – наклонный подчеркнутый;
fsBoldItalicUnderline – жирный наклонный подчеркнутый.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Стиль шрифтаЗадается именованными константами:fsNormal – обычный; fsBold – жирный; fsItalic – наклонный; fsBoldItalic – жирный наклонный; fsUnderline

Слайд 25Стиль шрифта
Program text;
uses GraphABC;
Begin
SetFontName('Arial');
SetFontSize(20);
SetFontColor(clRed);
TextOut(10,10,'обычный');

SetFontStyle(fsItalic);
SetFontColor(clBlue);
TextOut(10,50,'наклонный');
SetFontStyle(fsBold);
SetFontColor(clpink);
TextOut(10,90,'жирный');
SetFontStyle(fsUnderline);
SetFontColor(clblue);
TextOut(10,130,'подчеркнутый');
SetFontStyle(fsBoldItalicUnderline);
SetFontColor(clred);
TextOut(10,170,'жирный, наклонный, подчеркнутый');
end.

Введение

Граф.
примитивы

Цвет--стиль

Текст

Литература

Стиль шрифтаProgram text;uses GraphABC;Begin SetFontName('Arial'); SetFontSize(20); SetFontColor(clRed); TextOut(10,10,'обычный'); SetFontStyle(fsItalic); SetFontColor(clBlue); TextOut(10,50,'наклонный');

Слайд 26Пример 1
Пример
Введение
Граф.
примитивы
Цвет--стиль
Текст
Литература

Пример 1ПримерВведениеГраф. примитивыЦвет--стильТекстЛитература

Слайд 27Программа

Программа

Слайд 28Упражнения

Упражнения
Скачать презентацию

Похожие презентации

Презентация: Программное и аппаратное обеспечение ПК Презентация: Программное и аппаратное обеспечение ПК 612
Урок+презентация Приводы компакт-дисков принцип действия, эксплуатационные характеристики Урок+презентация Приводы компакт-дисков принцип действия, эксплуатационные характеристики 268
Презентация к занятию Локальные компьютерные сети Презентация к занятию Локальные компьютерные сети 196
Презентация по информатике Вероятностный подход к определению количества информации (10 класс) Презентация по информатике Вероятностный подход к определению количества информации (10 класс) 233
Презентация по предмету Основы алгоритмизации на тему Алгоритм циклической структуры Презентация по предмету Основы алгоритмизации на тему Алгоритм циклической структуры 236
Метопредметный конкурс МИФ (математика-информатика-физика)10 класс Метопредметный конкурс МИФ (математика-информатика-физика)10 класс 382

Что такое shareslide.ru?

Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.

Для правообладателей

Яндекс.Метрика

Обратная связь

Email: Нажмите что бы посмотреть