Презентация по теме PascalABC графика для 7-9 класса, урок №3

Графический режим Учитель информатики ГБОУ школа №118 СП 11 Серогодская Н.И. Г.Москва 1

Урок №3 2

Повторение : Составить программу выводящую на экран  изображения из графических преметивов  3

РЕШЕНИЕ Рисунок из графических примитивов   Program Eighth; uses crt,graphABC; Procedure Tr(x,y,r,g,b:integer); begin MoveTo(x,y); LineTo(x­50,y­86); LineTo(x+50,y­86); LineTo(x,y); FloodFill(x,y­5,RGB(r,g,b)); end; Begin Tr (100,100,0,0,255); Tr (200,100,255,0,0); Tr (150,186,0,255,0); End. 4

САМОСТОЯТЕЛЬНО: СОСТАВИТЬ ПРОГРАММУ ДЛЯ ВЫВОДА  ИЗОБРАЖЕНИЙ

Процедура  – это вспомогательный алгоритм, который предназначен для выполнения  некоторых действий. Применение:  ­ выполнение одинаковых действий в разных местах программы  ­ разбивка программы (или другой процедуры) на подзадачи для лучшего  восприятия procedure <имя процедуры>(<формальные параметры> :integer); begin <тело процедуры> end;   Порядок разработки процедуры:  ­ выделить одинаковые или похожие действия   ­ найти в них общее (размеры, форма, угол поворота) и отличия   ­ отличия записать в виде неизвестных переменных, они будут параметрами  процедуры    6

Особенности:  все  процедуры  расположены  выше  основной  программы в  заголовке  процедуры  перечисляются  формальные  параметры,  они  обозначаются именами, поскольку могут меняться  при  вызове  процедуры  в  скобках  указывают  фактические  параметры  (числа или арифметические выражения) в том же порядке  для каждого формального параметра после двоеточия указывают его  тип  если  однотипные  параметры  стоят  рядом,  их  перечисляют  через  запятую  внутри процедуры параметры используются так же, как и переменные локальные   в  переменные,  остальные  процедуры  не  имеют  к  ним  доступа процедуре  можно  объявлять  дополнительные  7

Серогодская Н.И. ГБОУ СОШ №1 корпус 2 Загрузка готового рисунка LoadPicture(fname) n:=LoadPicture(fname)  –  загружает  рисунок  из  файла  с  именем  fname  в  оперативную  память  и  возвращает описатель рисунка в целую переменную  n;  если  файл  не  найден,  то  возникает  ошибка  времени  выполнения.  Загружать  можно  рисунки  в  формате :bmp, .jpg или .gif. 8

Вывод рисунка в графическое окно DrawPicture(n,x,y); выводит рисунок с описателем n в позицию (x,y)  графического окна.  uses GraphABC; var pic: integer; begin   pic:=LoadPicture('demo.bmp');   DrawPicture(pic,10,10);   DestroyPicture(pic); end. 9

Список литературы  Федоренко Ю. Алгоритмы и программы на Турбо Паскале.  Фаронов В.В. Turbo Pascal 7.0. Начальный курс.  ­ Нолидж, 1998. ­620 с.    Грызлов В.И., Грызлова Т.П. Турбо Паскаль 7.0.  ­ М.: "ДМК", 2000. ­ 416 с. Зуев Е.А. Язык программирования Turbo Pascal 6.0.  ­ М.: Унитех, 1992. ­ 298с.,ил. Зуев Е.А. Turbo Pascal. Практическое программирование.  10