2. [Проверка домашнего задания]

 

3. Актуализация знаний и умений учащихся по пройденному материалу

1) Тестирование сообща

2) Найди ошибку в программе:

Уровень	Вариант 1	Вариант 2
1	Пример 1.1	Пример 1.2
2	Пример 2.1	Пример 2.2
3	Пример 3.1	Пример 3.2

Таблица результатов выполнения программ и заработанных баллов

Результат выполнения программы	Баллы
25	1
5050	1
1717	2
12750	3
15150	2
17500	3
другие результаты	0

3) Домино. Установите взаимно-однозначное соответствие:

1	x:=1;      While x<=10 do x:=x+1;          writeln(x);	П	Тело цикла не выполнится ни разу
2	x:=1      While x=1 do          begin               writeln(x)               x:=x+1          end	Х	Тело цикла будет выполнено 10 раз
3	x:=11;      While x<10 do          begin               writeln(x);               x:=x+1          end;	У	Тело цикла будет выполнено 1 раз
4	x:=1;      While x<5 do          begin               writeln(x);               x:=x-1          end;	С	Тело цикла будет выполняться бесконечно
5	x:=0;      While x<=5 do          begin               writeln(x);               x:=x+6          end;	Е	Появится сообщение о ошибке

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

4. Физминутка

 

5. Реализация, составление алгоритмов с использованием повторения. Графика в программе Паскаль авс.

Материал для повторения

Процедура	Назначение
uses graphabc;	Подключение модуля GraphABC
setwindowsize (940,680);	Устанавливается ширина и высота графического экрана
setwindowtitle ('Мой рисунок');	Заголовок окна
setpenwidth (2);	Устанавливает ширину пера, равную 2 пикселям
setpencolor(color);	Устанавливает цвет пера, задаваемый параметром color
rectangle(10,10,80,140);	Рисует прямоугольник, заданный координатами противоположных вершин (10,10) и  (80,140)
circle(50,90,20);	Рисует окружность с центром в точке (50,90) и радиусом 20
line(20,30,110,160);	Рисует отрезок с началом в точке (20,30) и концом в точке (110,160)
floodfill(15,15, clfuchsia);
Цветовые константы для работы с цветом
clBlack	черныйй
clPurple	фиолетовый
clWhite	белый
clRed	красный
clGreen	зеленый
clBrown	коричневый
clBlue	синий
clYellow	желтый
clOlive	оливковый
clFuchsia	сиреневый
clGray	темно-серый
clSilver	серебряный

 

Пример 1. Составим алгоритм, в результате которого будет нарисован один круг.

 

Можешь загрузить! Пример 1

 

Пример 2. Изменим алгоритм примера 1 так, чтобы в результате его выполнения будет нарисовано 10 кругов по горизонтали.

 

Задание 1. Измените алгоритм  примера 2 таким образом, чтобы в результате его выполнения рисовались 6 окружностей по вертикали.

 

Задание 2. Измените алгоритм  примера 2 таким образом, чтобы в результате его выполнения рисовалось несколько красных (clred) окружностей по диагонали.