Новинки - 2012 г. Для авторов Как пройти аттестацию Обратная связь Рекламодателям

Лекции и конспекты уроков Программирование Графика в среде Паскаль. Мультипликация

Цель урока:

Сформировать  специальные умения и навыки по работе с графикой в среде программирования Паскаль.

Задачи:
- Способствовать дальнейшему развитию навыков анализа изучаемого материала;
-  познакомиться с новыми приемам построения графических алгоритмов и их программированию на языке высокого уровня;
-  приобретение практических навыков работы на языке высокого уровня.

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

Развернутый план

Рассказ учителя:
Мы с вами переходим к завершающему этапу по теме программирование. Вы уже хорошо знакомы со средой Паскаль. Знаете структуру программы и много операторов, умеете создавать большие и маленькие, сложные и несложные программы. Кто-то из вас серьезно увлечется программированием и посвятит этому свою жизнь, кто-то просто получил практические навыки необходимые в современном мире и будет использовать их в другой профессии. В любом случае, программирование не уйдет бесследно из вашей жизни. И я думаю вам было бы интересно узнать, кто тот человек, который создал Паскаль, кому мы должны быть благодарны за этот простой, но строгий язык.

Презентация
1) В настоящее время в компьютерном мире существует много языков программирования. Программу, выполняющую одни и те же действия, можно написать на Бэйсике, Паскале, Си. Какой же из языков лучше? Ответ на этот вопрос не так прост. Однако можно с уверенностью сказать, что Паскаль лучше других языков подходит для обучения программированию. И это не удивительно, ведь этот язык был разработан швейцарским ученым Никлаусом Виртом в том числе и для целей обучения программированию.
Хочу подчеркнуть, что Паскаль – не «учебный», «не игрушечный» язык, он используется для разработки сложных, «профессиональных» программ, в том числе, предназначенных для работы в Windows.

2) Профессор Никлаус Вирт — живая легенда в мире программирования, блестящий инженер и глубокий исследователь, удостоенный в 1984 г. премии им. Тьюринга за разработку языка программирования Паскаль, с которым знаком каждый школьник. Тьюринговская премия — аналог Нобелевской и высшая почесть в информатике.

2) 30 сентября 2005 года столицу уральского региона – Екатеринбург посетил легендарный Никлаус Вирт (Niklaus Wirth). Ученый с мировым именем, профессор Высшей Политехнической школы ETH (Цюрих), где учились Альберт Эйнштейн и Джон фон Нейман.

3) Но наиболее известен господин Вирт тем, что изобрел семь языком программирования – в 1963 году Euler, в 1966 - Algol-W, в 1968 - PL360, в 1976 – Modula, в 1979 - Modula-2 и в 1988 – Оберон. Но наибольшую популярность и мировое признание Никлаус Вирт получил с изобретением языка Pascal в 1970 году.

4) Екатеринбург господин Вирт посетил в рамках своего турне по России, которое началось 13 сентября в Санкт-Петербурге и закончилось 5 октября в Томске. В ходе своего пребывания в городе профессор пообщался со студентами Уральского Государственного Университета (УрГУ), призерами олимпиад по программированию и провел круглый стол с учителями информатики екатеринбургских школ и преподавателями вузов.

5) Основная идея Никлауса Вирта:
Программирование становится столь же необходимым и обыденным элементом ремесла для самых различных профессий — физиков, химиков, инженеров, экономистов, лингвистов ... — каким уже давно являются базовые математические знания.

III. Повторение.
Проверка знаний по теме: «Графика в среде Паскаль».
Я предлагаю вам, отгадать тему нашего урока. На экране закрытые буквы темы (презентация), вам предстоит отгадать каждую букву. На столах  перед вами лежат листы с вопросами по предыдущим темам. Переверните их пожалуйста. Просмотрите глазами вопросы. Если вы знаете правильный ответ на вопрос, поднимайте руку. Для каждого вопроса вам предложено 2 варианта ответа: верный и неверный, напротив каждого ответа стоит буква, следовательно указав правильный ответ, вы указываете букву темы. Оценивать себя на уроке вы будете сами. В карту оценивания ставьте плюс за каждый правильный ответ, в конце урока верните мне подписанные карты. Желаю удачи!

IV. Объяснение нового материала.
Мы с вами уже знаем довольно много графических операторов, и умеем создавать интересные рисунки в среде программирования Паскаль. (презентация) Но гораздо интереснее создавать перемещающиеся изображения, т.е. мультипликацию. Как же это сделать? Давайте подумаем, как заставить перемещать по экрану, к примеру, окружность. Первое, что необходимо сделать - это нарисовать окружность. Рисует ее оператор (какой?) circle. (презентация) Что же сделать дальше?  Дальше ее необходимо нарисовать в другом месте, предварительно убрав  с предыдущего. Специальных операторов стирания в Паскале нет, но выход из данной ситуации программистами давно придуман. Если мы рисовали окружность, например, белым цветом, то для того чтобы стереть ее, необходимо нарисовать ее цветом фона, т.е. черным. Кроме этого - рисование и стирание необходимо зациклить, для того чтобы данные действия происходили многократно, до выполнения какого-либо условия. Итак – рисуем окружность, стираем ее, и рисуем в другом месте. (презентация) Но давай вспомним, как работает программа. Программа выполняет все команды программиста, начиная с самой верхней и двигаясь вниз. Следовательно, она выполнит все наши команды и выведет на экран последнюю, (презентация) но чтобы получить движение на экране необходимо видеть выполнение всех команд – в этом суть мультипликации. Значит нужно задержать выполнение команд: нарисовали окружность a задержали a стерли a нарисовали в другом месте.  (презентация) Для обеспечения задержки используется процедура DELAY (задержка). В скобках, в качестве параметра передается величина (в миллисекундах) необходимой задержки. Теперь необходимо подумать до каких пор будет продолжаться цикл. Лучше всего подходит процедура остановки цикла после нажатия любой клавиши на клавиатуре. Это процедура KEYPRESSED. Обе рассмотренные процедуры входят в библиотеку CRT, и ее необходимо объявить в разделе USES. (презентация)
Программа движения окружности (презентация)  :
Program okr;
Uses graph, crt;
Var x, y, r: integer;  { параметры окружности }
dx: integer;      { шаг перемещения окружности }
grdriver, grmode: integer;   { графический режим }
Begin
Grdriver:=detect;
Initgraph ( grdriver, grmode, ‘ ‘ );
X:=0;
Y:=100;
R:=20;
Dx:=2;
Repeat
Setcolor(15);
Circle(x,y,r);
Delay(100);
Setcolor(0);
Circle(x,y,r);
X:=x+dx;
Until keypressed;
Readln;
Closegraph;
End.

Таким образом, осуществляется мультипликация в Паскале.
V. Закрепление (презентация).

1. Вопрос: что необходимо изменить в программе, для того, чтобы окружность двигалась закрашенная? 
2. Выполнение разноуровневых заданий в среде программирования Паскаль.

VI. Домашнее задание (презентация).

• Повторение теоретического материала.
• Как выполнить мерцающую разными цветами окружность? Подумать и записать изменение к программе созданной на уроке.

Дополнительно
Демонстрационный материал к уроку презентация на тему: «Графика в среде Паскаль. Мультипликация»

Здесь представлен лишь скриншоты презентации. Полный вариант содержит 39 слайдов.

Файл презентации «Графика в среде Паскаль. Мультипликация», файл вопросов к теме и карточки с заданиями в архиве ZIP, объемом 1.28 MB (2-2-5-9.zip 1.28 MB)

Добавить комментарий