Инфоурок / Информатика / Статьи / Урок "Работаем с графикой"
Обращаем Ваше внимание: Министерство образования и науки рекомендует в 2017/2018 учебном году включать в программы воспитания и социализации образовательные события, приуроченные к году экологии (2017 год объявлен годом экологии и особо охраняемых природных территорий в Российской Федерации).

Учителям 1-11 классов и воспитателям дошкольных ОУ вместе с ребятами рекомендуем принять участие в международном конкурсе «Я люблю природу», приуроченном к году экологии. Участники конкурса проверят свои знания правил поведения на природе, узнают интересные факты о животных и растениях, занесённых в Красную книгу России. Все ученики будут награждены красочными наградными материалами, а учителя получат бесплатные свидетельства о подготовке участников и призёров международного конкурса.

ПРИЁМ ЗАЯВОК ТОЛЬКО ДО 15 ДЕКАБРЯ!

Конкурс "Я люблю природу"

Урок "Работаем с графикой"




Московские документы для аттестации!

124 курса профессиональной переподготовки от 4 795 руб.
274 курса повышения квалификации от 1 225 руб.

Для выбора курса воспользуйтесь поиском на сайте KURSY.ORG


Вы получите официальный Диплом или Удостоверение установленного образца в соответствии с требованиями государства (образовательная Лицензия № 038767 выдана ООО "Столичный учебный центр" Департаментом образования города МОСКВА).

ДИПЛОМ от Столичного учебного центра: KURSY.ORG


Выберите документ из архива для просмотра:

Выбранный для просмотра документ Программа Салют.doc

библиотека
материалов

Александр Георгиевич Задорожный

Учитель информатики и ИКТ

МБОУ СОШ № 125

с углубленным изучением математики

г.Снежинска

Информатика и ИКТ

9 класс

Факультативное занятие

Создание программы «Салют»

Цель занятия: формирование навыка изготовления модели средствами Visual Basic

Задача занятия: научить разрабатывать модель по этапам .

Опорные знания: модель, датчик случайных чисел.

Оборудование урока:

  • ПК (презентация работы программы и ее текста на проекторе);

Основные этапы занятия.

  1. Постановка цели и задачи занятия, актуализация знаний по теме «Модели».

  2. Сhello_html_mccebb92.jpgоставление макета программы «Салют». Программа «Салют» моделирует простейший фейерверк, расходящихся радиальных цветных лучей. Для ее выполнения предусматриваем настраиваемое число линий, из которых и будет состоять салют. Линии, в свою очередь, разбиваются на разноцветные куски, количество которых также настраивается. Размер фейерверка задается параметром «мах». В программе используется пять цветов. Макет программы представлен ниже.



















3. Обсуждение вариантов написания программы и составления текста программы. Приведенная программа дается как образец. Учащиеся изменяют количество линий, число фрагментов линий и масштаб фейерверка для понимания работы программы. Далее учащимся предлагается внести уже более существенные изменения в текст программы. Например, они могут увеличить количество цветов или сделать фейерверк несимметричным.

Программа «Салют»

Private Sub Command1_Click()

Dim I, IL, IR, NL, NR, Xm As Long, X0, Y0, X, Y, RM, LM, SL, SR, K, Col As Single


NL = Text1.Text: NR = Text2.Text: Xm = Text3.Text: SL = 360 / NL: SR = 4 / NR

Picture1.Scale (-Xm, Xm)-(Xm, -Xm): K = 3.1415926 / 180

If Rnd > 0.5 Then

X

N линий

50

Picture1

0 = Rnd * Xm: RM = Rnd + 4

Else

X

N кусков

1000

0 = -Rnd * Xm: RM = 4 - Rnd

End If

If Rnd > 0.5 Then

Y

Max

10

0 = Rnd * Xm

Else

Y0 = -Rnd * Xm

E

Command1_Пуск

Command2_CSL


nd If

Picture1.PSet (X0, Y0), vbGreen


For IR = 1 To RM Step SR

For IL = 360 To 0 Step -SL

X = X0 + IR * Sin(IL * K): Y = Y0 + IR * Cos(IL * K):

Col = (IR + 5 * Rnd) Mod 5

Select Case Col

Case 1: Picture1.Line (X, Y)-(X0, Y0), vbRed

Case 2: Picture1.Line (X, Y)-(X0, Y0), vbGreen

Case 3: Picture1.Line (X, Y)-(X0, Y0), vbYellow

Case 4: Picture1.Line (X, Y)-(X0, Y0), vbBlue

Case 5: Picture1.Line (X, Y)-(X0, Y0), vbSilver

End Select

Next IL

Next IR


End Sub


Private Sub Command2_Click()

Picture1.Cls

End Sub


Результат работы программы может выглядеть так:

hello_html_m13a796cd.jpg


















hello_html_m12217d1d.png























А это настоящий фейерверк.



hello_html_1d818a1e.jpg















  1. Подведение итогов.

Перед учащимися ставится вопросы:

- Какие другие идеи можно использовать для моделирования фейерверка?

- Какое прикладное значение может иметь программа?

- Как изменить программу для появления звукового эффекта?


Литература:

  1. Браун С. Visual Basic. Учебный курс. – Спб.: Питер, 2002.

  2. Угринович Н.Д. Информатика и ИКТ: учебник для 9 класса. 2 издание. – М.: БИНОМ, 2009.

  3. Угринович Н.Д. Исследование информационных моделей. Элективный курс.: Учебное пособие – 2 издание. – М.: БИНОМ, 2006.

Самые низкие цены на курсы переподготовки

Специально для учителей, воспитателей и других работников системы образования действуют 50% скидки при обучении на курсах профессиональной переподготовки.

После окончания обучения выдаётся диплом о профессиональной переподготовке установленного образца с присвоением квалификации (признаётся при прохождении аттестации по всей России).

Обучение проходит заочно прямо на сайте проекта "Инфоурок", но в дипломе форма обучения не указывается.

Начало обучения ближайшей группы: 20 декабря. Оплата возможна в беспроцентную рассрочку (10% в начале обучения и 90% в конце обучения)!

Подайте заявку на интересующий Вас курс сейчас: https://infourok.ru


Общая информация

Номер материала: ДБ-351529
Курсы профессиональной переподготовки
133 курса

Выдаем дипломы установленного образца

Заочное обучение - на сайте «Инфоурок»
(в дипломе форма обучения не указывается)

Начало обучения: 20 декабря
(набор групп каждую неделю)

Лицензия на образовательную деятельность
(№5201 выдана ООО «Инфоурок» 20.05.2016)


Скидка 50%

от 13 800  6 900 руб. / 300 часов

от 17 800  8 900 руб. / 600 часов

Выберите квалификацию, которая должна быть указана в Вашем дипломе:
... и ещё 87 других квалификаций, которые Вы можете получить

Похожие материалы

Получите наградные документы сразу с 38 конкурсов за один орг.взнос: Подробнее ->>