Меня зовут Чебыкин Егор.
Я занимаюсь в Центре юных техников в объединении «Курс программирования». Моя работа называется «Счётный цикл». На языке программирования Паскаль я создал программы, которые показывают, как с помощью счётного цикла можно регулировать количество объектов и их передвижение на экране.
Часто при работе с графикой возникает необходимость произвести на экране передвижение объекта или создать большое количество однотипных объектов. В этом может помочь применени
Цель моей работы показать на конкретных примерах эффективность использования цикла.
При этом необходимо решить следующие задачи:
- Развивать потребность в познавательной деятельности. Применять научные методы исследования, овладевать навыками их использования. Развивать интерес к изучаемому материалу. Формировать специальные знания, необходимые будущему программисту.
Поставленные задачи решаются с помощью методов проблемного обучения(обучающийся сам добывает знания с помощью педагога).
Гипотетически предполагаю, что в результате этой исследовательской работы я получу опыт использования цикла, материал, полученный в результате наблюдений за работой цикла, пригодится мне в дальнейшей работе.
Использование цикла для создания динамичных изображений.
В языке программирования имеются три оператора, с помощью которых можно запрограммировать повторяющиеся действия. Это операторы: FOR (для), ТО (до), DO (выполнять). Вместе они образуют цикл. Первый оператор цикла FOR, задaёт количество повторений.
Обратимся к программе Цикл
uses ABCObjects;
var r: RectangleABC;
B: integer;
begin
r:=RectangleABC. Create(50,100,200,100,clMoneyGreen);
r. TextVisible:=True;
r. TextScale:=0.5;
r. Scale(0.5);
for B:=1 to 100 do
begin
r. RealNumber:=B;
Sleep(100);
end;
end.
Мы видим цикл. Кроме операторов FOR (для), ТО (до), DO. Важную роль играет переменная В именно она принимает значения которые задаются в цикле. Переменой она называется потому, что может менять свои значения. Наглядно работу переменной видно в программе CIKL. Запускаем программу. Видим бегущие цифры, цикл задал переменной изменяться до 100
Можно задать изменения до 30. Можно задать изменения до 10. С помощью оператора DELAY можно регулировать скорость бегущих цифр. Можно подумать, как применять на практике способность переменной менять свои значения.
Обратимся к программе FURGON.
uses graphabc, crt;
var
B:integer;
begin
FOR B:=20 TO 500 DO
begin
repeat
setbrushcolor(clblack);
rectangle(B,150,B+40,120);
delay(10);
setpencolor(clwhite);
rectangle(B,150,B+40,120);
delay(10);
setbrushcolor(clblue);
rectangle(B+40,150,B+60,130);
delay(10);
circle(B+45,155,7);
circle(B+10,155,7);
circle(B+25,155,7);
until keypressed
end;
end.
Мы видим здесь наличие цикла for B:=20 to 500 do. видим переменную B, которая будет изменяться, когда мы запустим программу, от 20 до 500. В программе мы имеются два прямоугольника
rectangle(B,150,B+40,120); и
rectangle(B+40,150,B+60,130);
Мы видим, что оба прямоугольника содержат переменную В, которая при запуске программы будет изменяться от 20 да 500.
Запустим программу FURGON.
Фургон двигается благодаря тому, что переменная меняет свои значения. Уменьшим значение переменной в два раза.
for В:=20 to 250 do
расстояние, которое проезжает фургон, сократилось в два раза.
Можем заставить фургон двигаться задним ходом. Для этого переставим значения в цикле.
for B:=500 downto 500 do
В программе «Как быстро построить забор» цикл использован для вычерчивания линий забора. Чтобы начертить забор, состоящий из досок, нужно около 60 линий. Это большая и кропотливая работа. Все изменится, если применить цикл.
Запускаем программу «Как быстро построить забор», видим дом, состоящий из линий (line) и прямоугольников (rectangle). Чтобы построить забор, нужно просто нажать клавишу. Цикл начнет работу.
uses graphabc, crt;
var y, x:integer;
begin
setbrushcolor(clred);
circle(149,288,8);
line(49,320,49,351);
line(181,351,181,320);
line(49,351,181,351);
line(88,315,88,335);
line(152,315,152,335);
line(65,324,78,324);
line(0,320,49,320);
rectangle(50,350,180,300);
rectangle(180,300,115,350);
line(115,300,147,268);
line(147,268,180,300);
line(50,300,82,268);
line(82,268,147,268);
rectangle(65,315,100,339);
rectangle(130,315,165,335);
for y:=9 to 35 do
begin
repeat
setpencolor(clbrown);
line(y*20,300,y*20,355);
line(y*20+10,290,y*20,300);
line(y*20-10,290,y*20,300);
delay(50);
setpencolor(clyellow);
setbrushcolor(clyellow);
circle(522,60,20);
line(400,60,470,60);
line(522,90,522,140);
line(500,80,420,140);
until keypressed;
end;
end.
У каждой доски – три линии. Две – это заостренный верх и одна вертикальная и еще одна вертикальная является общей. Забор состоит из трех последовательностей линий. Рассмотрим первую.
line(y*20,300,y*20,355);
//line(y*20+10,290,y*20,300);
//ine(y*20-10,290,y*20,300);
Вертикальные линии
//line(y*20,300,y*20,355);
line(y*20+10,290,y*20,300);
//line(y*20-10,290,y*20,300);
Заостренные слева
//line(y*20,300,y*20,355);
//line(y*20+10,290,y*20,300);
line(y*20-10,290,y*20,300);
заостренные справа.
Можно развернуть направление постройки забора, поменять скорость.
Програма «Робот». Глаза увеличиваются из-за изменения переменной
Знакомая всем рекламная бегущая строка на телевизорах создается также с помощью цикла.
Обычно движение на экранах телевизора происходит справа налево. Я также запущу бегущую строку справа налево.
С помощью цикла можно изменить размер букв.
Выволы.
Мы видим, что применение цикла делает работу программиста более эффективной. С помощью цикла осуществляется передвижение объектов на экране, меняется направление движения и скорость передвижения.
С помощью цикла можно создавать большое количество однотипных объектов.
МБУДО «ЦЕНТР ЮНЫХ ТЕХНИКОВ»
« СЧЕТНЫЙ ЦИКЛ»
Автор:
МБУДО «ЦЕНТР ЮНЫХ ТЕХНИКОВ»
МАОУ СОШ № 2, КЛАСС 5 «Б».
Научный руководитель:
,
педагог дополнительного образования,
первой категории
Златоуст -2017


