Информатика 10 класс, 31 неделя, урок 60: Практическое занятие

Графика в Delphi

Уроки 59–60 · 2 урока · Н. И. Тайлаков (общий редактор), А. Б. Ахмедов, М. Д. Пардаева, А. А. Абдуганиев, У. М. Мирсанов. Информатика и информационные технологии, 10 класс, 1-е издание. «Extremum-Press», Ташкент, 2017

Практическое занятие

Учебник: с. 137–138

ЦельРисует вложенные фигуры, оси координат и цветные композиции с помощью Canvas; вычисляет координаты циклом и по формулам.

Новые слова

вложенные фигуры: фигуры, нарисованные одна внутри другой вокруг общего центра · ichma-ich shakllarзасечка: короткая отметка на оси · belgi (tick)bsClear: стиль кисти, при котором фигура не заливается · bsClearцентр: точка, вокруг которой размещаются фигуры · markaz

Объяснение

На практическом занятии координаты рисунка вычисляются циклом. 1) «Вложенные квадраты»: Image 200×200, центр (100, 100). Установите кисть bsClear и for i := 1 to 8 do Rectangle(100 - 12 * i, 100 - 12 * i, 100 + 12 * i, 100 + 12 * i); – сторона i-го квадрата равна 24·i пикселей, а у самого большого – 192. 2) «Оси координат»: MoveTo(10, 100); LineTo(190, 100); – горизонтальная ось, MoveTo(100, 10); LineTo(100, 190); – вертикальная ось, засечки: for i := 1 to 9 do { x = 20·i, отрезок от y = 96 до 104 }. 3) «Цветные круги»: 5 кругов с общим центром, цвет каждого задаётся формулой RGB(50·i, 0, 255 – 50·i). В каждом приложении вычисляйте самые важные числа (сторону наибольшего квадрата, число засечек) до рисования, записывайте их и сравнивайте с картинкой.

Примеры

Квадраты: i = 1: Rectangle(88, 88, 112, 112), сторона 24; i = 3: Rectangle(64, 64, 136, 136), сторона 72; i = 8: Rectangle(4, 4, 196, 196), сторона 192. Сумма сторон всех 8 квадратов равна 24·(1+2+…+8) = 24·36 = 864.

Засечки: x = 20, 40, …, 180 – их девять; расстояние между ними 20 пикселей. Для 5 цветных кругов: RGB(50, 0, 205), RGB(100, 0, 155), RGB(150, 0, 105), RGB(200, 0, 55), RGB(250, 0, 5): красного становится больше, а синего меньше.

Работа в классе

«Рисунок и вычисление»: группа создаёт 6 вложенных кругов по собственной формуле и заранее вычисляет диаметр наибольшего круга и сумму всех диаметров.

Упражнения

Чему равна сторона Rectangle(100-12*i, 100-12*i, 100+12*i, 100+12*i) при i = 4?

Чему равна сумма сторон 8 вложенных квадратов?

Каковы три значения RGB(50*i, 0, 255-50*i) при i = 3?

Почему для вложенных фигур кисть должна быть bsClear?