- Циклы. Программирование рисунка

Конспект урока «Циклы. Программирование рисунка» по информатике

Тема урока: Циклы. Программирование рисунка.

Цель урока: - Показать использование функций графики в циклах.

План урока: 1. Алгоритм построение рисунка. Сценарий рисунка.

  1. Программа рисунка для ЭВМ

Ход урока:

Uses Crt, GraphABC;

Var x,i,y,r:integer;

BEGIN

Floodfill(1,1,clnavy);

темно-синий фон

Рисование тучи

randomize;


setbrushcolor(cllightgray);

светло-серый круг

setpencolor(cldarkgray);

темно-серая окружность

For x:=100 To 400 Do

ellipse(x,random(30)+10,x+50,random(70));

эллипс разного размера

Рисование дождя

setpencolor(clgray);

серый цвет

x:=120;

Repeat

line(x,80,x+20,random(120)+120);

линии дождя

x:=x+10;

delay(10);

Until x>400;

Рисование стены дома

x:=350;

y:=360;

repeat

repeat

setpencolor(clmaroon);

кирпичный цвет

fillrect(x+2,y+2,x+51,y+11);

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

setpencolor(clLightgray);

светло-серый цвет

rectangle(x,y,x+50,y+10);

раствор между кирпичами

y:=y-10;

delay(50);

until y

y:=360; x:=x+50;

и по горизонтали

until x>500;

Рисование украшение на дом виде кружков

y:=200; r:=15;

repeat

setbrushcolor(clOlive);

Оливковый цвет

circle(350,y,r);

круги слева

circle(550,y,r);

круги справа

y:=y+20;

увеличение Y вниз

r:=r-2;

уменьшение радиуса

delay(10);

пауза

until y>280;

Рисование крыши

x:=10;

For y:=200 Downto 100 Do

begin

setpencolor(clpurple);

Line(300+x,y,600-x,y);

трапеция

x:=x+1;

delay(50);

end;

Рисование окна

For y:=300 Downto 230 Do

begin

setpencolor(clyellow);

Желтый цвет

fillrect(410,y,480,y-10);

фон окна

delay(10);

end;

Рисование ступенек

x:=520; y:=330;

while Xdo

begin

setbrushcolor(clSkyBlue);

Небесно-голубой цвет

rectangle (x,y,x+30,y+10);

ступенька

x:=x+30;

y:=y+10;

delay(10);

end;

Рисование фонаря

For r:=1 To 9 Do

begin

setpencolor(clfuchsia);

фиолетовый цвет

arc(580,280,r*2,0,360);

фонарь из кругов

Line(540,290+r,580,295+r);

подставка

delay(10);

end;

Рисование забора

x:=50;

While x400 Do

begin

setpencolor(clred);

Красный цвет

rectangle(x-2,258,x+32,372);

контур забора

setbrushcolor(clgray);

серый цвет

fillrect(x,260,x+30,370);

фон забора

x:=x+40;

delay(10);

end;

Рисование ёлки

For I:=120 Downto 0 Do

begin

Setpencolor(clgreen);

зеленый цвет

Line(80+random(i-1),260+i,80-random(i-1),260+i);

ветки ёлки

Setpencolor(clbrown);

коричневый цвет

Line(80,270+i,85,270+i);

ствол ёлки

Setpencolor(cllime);

Салатный цвет

Line(80-random(i-1),250+i,80+random(i+1),250+i);

ветки елки

delay(10);

end;

END.


Похожая картина в редакторе ТР

Uses Crt,Graph;


Var x,i,y,r:integer;


BEGIN


i:=detect;


InitGraph(i,i,'');


randomize;


setbkcolor(1);

цвет фона (синий)

setcolor(8);

цвет эллипса (серый)

setfillstyle(1,7);

стиль (сплошной, св.серый)

эллипсовидные тучи


For x:=100 To 400 Do


begin


fillellipse(x,random(50)+40,random(40),random(20));

случайное построение эллипса

delay(2500);

пауза в выполнении

end;


setcolor(3);


дождь с помощью линий


x:=120;


Repeat


line(x,100,x+20,random(120)+120);

линии случайной длины

delay(2300);

пауза в выполнении

x:=x+10;

увеличение х на 10

Until x>400;


забор с контуром и фоном


x:=100;


While xDo


begin


setcolor(15);


rectangle(x-2,258,x+32,372);

контур прямоугольника

setfillstyle(random(10)+1,random(16)+3);


bar(x,260,x+30,370);

фон прямоугольника

x:=x+40; end;


нечто зеленое и дом


For y:=400 Downto 200 Do


begin


setcolor(2);

установка зеленого цвета

line(random(100)+100,y,random(200),y);


delay(2000);

пауза в выполнении

setcolor(6);

установка коричневого цвета

line(500,y,620,y); end;



Здесь представлен конспект к уроку на тему «Циклы. Программирование рисунка», который Вы можете бесплатно скачать на нашем сайте. Предмет конспекта: Информатика Также здесь Вы можете найти дополнительные учебные материалы и презентации по данной теме, используя которые, Вы сможете еще больше заинтересовать аудиторию и преподнести еще больше полезной информации.

Список похожих конспектов

Фрагмент рисунка

Фрагмент рисунка

Муниципальное бюджетное общеобразовательное учреждение. «Красноануйская основная общеобразовательная школа». Солонешенского района Алтайского ...
Создание рисунка в векторном графическом редакторе

Создание рисунка в векторном графическом редакторе

Крышталь Лилия Ивановна – учитель информатики. Едренникова Светлана Ивановна - учитель русского языка. . МБОУ СОШ № 8, города Ноябрьск. 9 класс. ...
Создание рисунка из типовых объектов

Создание рисунка из типовых объектов

Конспект урока информатики 5 класс. Методические рекомендации:. данный урок можно провести в 5 классе по программе Н.В. Макаровой или в 6 классе ...
Редактирование рисунка

Редактирование рисунка

Конспект урока для. 5 класса. «Редактирование рисунка». Тип урока:. урок изучения новой темы. Форма урока:. комбинированный – лекция и ...
Сборка рисунка из деталей

Сборка рисунка из деталей

Муниципальное бюджетное общеобразовательное учреждение. «Красноануйская основная общеобразовательная школа». Солонешенского района Алтайского ...
Программирование разветвляющихся алгоритмов

Программирование разветвляющихся алгоритмов

Учитель:. Борисенко Ирина Владимировна. МКОУ СОШ №6 г. Ипатово, Ставропольский край. Предметная область:. Информатика и ИКТ 9 класс. Тема:. Программирование ...
Программирование условий. Условный оператор

Программирование условий. Условный оператор

Класс. : 9. Предмет. : информатика. Учитель:. Клементьева О.С. Казахстан, Карагандинская область, г. Балхаш. Тема. : Программирование условий. ...
Операторы ввода и вывода. Программирование линейных алгоритмов

Операторы ввода и вывода. Программирование линейных алгоритмов

ГУ Михайловская СШ. Урока по информатике для 9 класса. «Операторы ввода и вывода. . . Программирование линейных алгоритмов». ...
Программирование ветвлений на Паскале

Программирование ветвлений на Паскале

План – конспект урока по информатике. Тема урока:. Программирование ветвлений на Паскале. Цель урока:Образовательная. : познакомить учащихся с ...
Набор текста, вставка рисунка из Paint в WordPad

Набор текста, вставка рисунка из Paint в WordPad

Тема: Набор текста, вставка рисунка из Paint. в . WordPad. Цель:. научить учащихся вставлять рисунки из Paint. , дату, время и другие оъекты ...
Операторы ввода и вывода. Программирование линейных алгоритмов

Операторы ввода и вывода. Программирование линейных алгоритмов

ГУ Михайловская СШ. Разработка урока по информатике. «Операторы ввода и вывода. . . Программирование линейных алгоритмов». ...
Копирование фрагментов рисунка в графическом редакторе Paint

Копирование фрагментов рисунка в графическом редакторе Paint

Муниципальное бюджетное общеобразовательное учреждение. «Красноануйская основная общеобразовательная школа». Солонешенского района Алтайского ...
Действия с фрагментом рисунка в графическом редакторе

Действия с фрагментом рисунка в графическом редакторе

Муниципальное общеобразовательное учреждение. средняя общеобразовательная школа №2. Усть-Камчатского муниципального района. Конспект ...
Графический редактор PAINT. Отражение, поворот и перемещение элементов рисунка

Графический редактор PAINT. Отражение, поворот и перемещение элементов рисунка

Конспект открытого урока по информатике. «Графический редактор PAINT. . . . Отражение, поворот и перемещение элементов рисунка». (5 класс). ...
Циклы в языке программирования Pascal

Циклы в языке программирования Pascal

. Методическая разработка. . на тему. «Циклы в языке программирования Pascal. ». ...
Программирование динамической модели

Программирование динамической модели

Конспект урока по информатике в 9 классе Предмет:.  информатика и ИКТКласс:. 9 классТема: “. Программирование динамической модели”. . Тема урока ...
Выделение фрагмента рисунка

Выделение фрагмента рисунка

Тема урока:. Выделение фрагмента рисунка 6 класс ______. Тип урока:. Изучение нового материала. Вид:. Урок – практикум. Цели урока:. Образовательная:. ...
Программирование динамической модели

Программирование динамической модели

План - конспект урока информатики и ИКТ в 9 классе по теме : “ Программирование динамической модели”. Тема урока :. Программирование динамической ...
Программирование разветвляющихся алгоритмов. Условный оператор

Программирование разветвляющихся алгоритмов. Условный оператор

Пыхтина Юлия Викторовна, учитель информатики, МБОУ «Гимназия №2» г.Курчатова. . Урок по информатике. . в 9 классе. по теме:. Программирование ...
Программирование линейных алгоритмов

Программирование линейных алгоритмов

Класс:. 7 (ІІ. подгруппа). Тема:. Программирование линейных алгоритмов. Цели:. 1. Познакомить с основными операторами линейных программ в Паскале; ...

Информация о конспекте

Ваша оценка: Оцените конспект по шкале от 1 до 5 баллов
Дата добавления:3 июля 2016
Категория:Информатика
Поделись с друзьями:
Скачать конспект