Сабақтан тыс жұмыстар жинағы «эем операторы»

Кентау – 2015ж.

• 
  Білімділік: Графика түсінігі. Тurbo Pascal бағдарламасында қолданылатын графикалық функциялар және процедуралармен таныстыру, графика туралы білім-біліктілігін жетілдіру.
  
• 
  Дамытушылық: Turbo Pascal бағдарламалау тілі графикалық функциялары туралы білім-біліктерін арттыру, өздігінен ізденуге, ой-өрісін дамытуға үйрету
  
• 
  Тәрбиелік: Ұқыптылыққа, ақпараттық мәдениетке, мәдени ойлануға тәрбиелеу. Жан-жақты болуға, өз бетімен жұмыс істеуге, алған білімдерін өмірде пайдалануға баулу.
  

1. 
   Ұйымдастыру бөлімі – 1 минут.
   
2. 
   Кіріспе инструктаж – 9 минут:
   

Б) жаңа сабақты түсіндіру;

В) жаңа сабақты қалай түсінгендіктерін тексеріп көру;

Г) осы күнге тапсырма беру;

3. 
   Өз бетінше жұмыс істеу – 25 минут.
   

4. 
   Қорытынды инструктаж – 10 минут
   

Б) жақсы және нашар орындалған жұмыстарды көрсету;

В) үйге тапсырма беру: Бақаның суретін салу
1. Ұйымдастыру бөлімі
А) Амандасу.

Б) Оқушыларды түгелдеу.

В) Сабақтың мақсатын хабарлау.
2. Кіріспе инструктаж – 9 минут:

А) өткен сабақты қайталау;

№2 тапсырма

Қарамай табу ойыны
Begin Program

End Integer

Write Read

Readln line

Pascal graphABC

Б) жаңа сабақты түсіндіру;

Нүкте салу операторы. Экранның кез келген жерiне нүкте салуға болады, GRAPH модулiнде нүкте PutPixel процедурасы арқылы са­лы­нады, оның пiшiмi

мұндағы Х,У – нүкте коорди­наталары, color оның түсiн анықтай­ды. Мысалы, for I:=1 to 60 do PutPixel(I,1,Red); операторы бiрiншi қатарда 60 қызыл нүктеден тұратын сызық салады. Экран бетiндегi бұрын салынған нүктенiң орнын анықтау үшiн келесi функциясы қолданылады.

GetPixel (X,У : integer): word;

Түзу сызық салу процедурасы экранда екi шетiнiң координата­лары берiлген кесiндi сызу iсiн атқарады. Оның пiшiмi

мұнда ағымдағы түс бойынша координа­талары Х1,У1 нүктесiнен Х2,У2 нүктесiне дейiн кесiндi сызылады, мысалы, Line (1,1, 600,1);

Бастапқы нүкте көрсетiлмесе, онда мына процедура

Lineto (X.Y: integer);

курсор тұрдан орыннан бастап координа­талары Х,У болатын нүктеге дейiн түзу сызық сызады.

SetColor (Color: word); процедурасы қолданылады, мұн­дағы Color – жаңадан орнатылатын түстiң аты немесе нөмiрi. Мысалы,

SetColor(Cyan); {Сызық түстерi көгiлдiр болады}

SetColor(7); {Сызық түстерi боз болады}

SetBkColor (Color: word); процедурасы экран түсiн, яғни рең (фон) түсiн өзгертедi, мұндағы Color – жаңадан орнатылатын түстiң аты немесе нөмiрi. EGA/VGA адап­терлерi үшiн рең түсiн 0..63 аралығында беруге болады. Мысалы,

SetBkColor(Blue); {Экран түсi көк болады}

SetBkColor(4); {Экран түсi қызыл болады}

Адаптерлерде пайдаланылатын түрлi түстер