Рабочие листы
к вашим урокам
Скачать
1 слайд
Методическая разработка открытого урока на тему: Перевод экрана в графический режим, фигуры на Паскаль
МИНИСТЕРСТВО ВЫСШЕГО И СРЕДНЕГО
СПЕЦИАЛЬНОГО ОБРАЗОВАНИЯ РЕСПУБЛИКИ
УЗБЕКИСТАН
Средняя школа № 3
Учитель: Каримова Д.Г.
г. Зарафшан -2019 г
2 слайд
Цель урока:
Цели урока: Знакомство учащихся с графическим режимом
Образовательная: Отработать новые навыки работы по данной теме, закрепить известные способы, действия, а также добиться усвоения пройденного материала и закрепить его на практике с помощью предложенного задания (Коммуникативная компетенция)
Воспитательные: Воспитать интерес к предмету. Формирование познавательной конкретности, воспитание ответственности за своё поведение, воли и упорства в достижении поставленной цели. Воспитание у подрастающего поколения навыков работы с современными средствами информационных технологий (Компетенция самосовершенствования)
Развивающие: Развить интерес к новым информационным технологиям, умения творчески подходить к предложенным заданиям, а также развить способности и умения ориентироваться в сложившейся ситуации; развитие самостоятельного мышления, логических и алгоритмических способностей для использования полученных знаний в жизни (Информационная компетенция)
Основные понятия: графический модуль, графический драйвер
Вид урока: изучение нового материала
Оборудование: проектор, компьютер, презентация, доска, мел , учебник
Методы: Эвристический, наглядно-иллюстративный, устный опрос, практическая работа
3 слайд
Цель нашего урока:
Девиз нашего урока:
«Не уходите , не узнав,
не читайте, не поняв»
" Нельзя постичь науку,
не приложив труда"
Сегодня на уроке
Программа Паскаль
Алгоритм
4 слайд
Николас Вирт
Мухаммад ал-Хорезмий
Название группы
5 слайд
The purpose of our lesson:
The motto of
our lesson:
«Don't leave without knowing, do not read, do not understand»
«You can not comprehend science without putting work»
Тoday in class
6 слайд
While
Repeat
PROGRAM Primer_1a;
var S: Real; N: Integer;
BEGIN S:=0; N:=1; While N<=50 do
begin S:=S+1/N; N:=N+1 end;
WriteLn ('Суммаравна: ',S) ;
END.
PROGRAM Primer_1c;
var N: Integer;
S: Real;
BEGIN
S:=0; N:=1;
Repeat
S:=S+1/N; N:=N+1
until N>50;
WriteLn ('Результат суммирования... ',S)
END.
Повторение темы
Cоставление программ Вычислить сумму
7 слайд
7
Изложения новые темы
Подключение дополнительных библиотек
Для работы в графическом режиме необходимо подключение модуля GraphABC.
Первой инструкцией программы должна быть инструкция
uses GraphABC;
8 слайд
8
Графический режим
Графический экран PasсalABC (по умолчанию) содержит 640 точек по горизонтали и 400 точек по вертикали.
640 точек
400 точек
Начало отсчета – левый верхний угол экрана
x
Y
9 слайд
9
Управление экраном
SetWindowWidth(w) - Устанавливает ширину графического окна;
SetWindowHeight(h) - Устанавливает высоту графического окна;
10 слайд
10
ClearWindow; - очищает графическое окно белым цветом.
ClearWindow(color); - очищает графическое окно указанным цветом.
Очистка графического окна
program clear;
uses GraphABC;
begin
ClearWindow;
ClearWindow (clMoneyGreen);
end.
Цвет зеленых денег
11 слайд
11
Графические примитивы
Точка
Линия
Прямоугольник
Окружность
Эллипс
Сектор
Дуга
12 слайд
12
Точка
SetPixel(x,y,color) - Закрашивает один пиксел с координатами (x,y) цветом color
program tochka;
uses GraphABC;
begin
SetPixel(300,200,clred);
end.
13 слайд
13
Линии
LineTo(x,y) - рисует отрезок от текущего положения пера до точки (x,y); координаты пера при этом также становятся равными (x,y).
x,y
Program liniay;
uses GraphABC;
begin LineTo(300,200);
end.
14 слайд
14
Линии
Line(x1,y1,x2,y2) - рисует отрезок с началом в точке (x1,y1) и концом
в точке (x2,y2).
Program liniay;
uses GraphABC;
begin
line(100,50,500,250);
end.
x1,y1
x2,y2
15 слайд
15
Используемые цвета
Random(16777215) – случайный цвет
из всей палитры цветов Паскаля
16 слайд
16
Цвет линии
SetPenColor(color) - устанавливает цвет пера, задаваемый параметром color.
Program liniay;
uses GraphABC;
begin
setpencolor(clred);
line(30,30,400,350);
end.
17 слайд
17
Толщина линии
SetPenWidth(n) - устанавливает ширину (толщину) пера, равную n пикселям.
Program liniay;
uses GraphABC;
begin
setpenwidth(20);
setpencolor(clred);
line(30,30,400,350);
end.
18 слайд
18
Прямоугольник
Rectangle(x1,y1,x2,y2) - рисует прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2).
Program pryamougolnik;
uses GraphABC;
Begin
Rectangle(50,50,200,200);
end.
x1,y1
x2,y2
19 слайд
19
Заливка цветом
FloodFill(x,y,color) - заливает область одного цвета цветом color, начиная с точки (x,y).
Program pryamougolnik;
uses GraphABC;
begin
Rectangle(50,50,200,200);
FloodFill(100,100,clBlue);
end.
x1,y1
x2,y2
20 слайд
1-группа
2-группа
Составьте программу который рисует Прямоугольник, толщинам 20 пикселей
Составьте программу который рисует Прямоугольник, зеленым светом
Составьте программу
21 слайд
2-группа
Составьте программу который рисует Прямоугольник, толщинам 20 пикселей
Ответы
uses GraphABC;
Begin
setpenwidth(20);
setpencolor(clred);
Rectangle(50,50,200,200);
end.
22 слайд
2-группа
Составьте программу который рисует Прямоугольник, зеленым светом
Ответы
uses GraphABC;
Begin
Rectangle(50,50,200,200);
FloodFill(100,100,clgreen);
end.
23 слайд
Диктант по информатике:
Служебное слово для описания целочисленной переменной
Integer
Оператор вывода на экран
Write, writeln
Раздел описания переменных
Var
Служебное слово для описания строковой переменной
String
Общий вид оператора цикла с параметром
Fori=N1 toN2 Do (тело цикла)
Служебное слово для описания вещественной переменной
real
Оператор окончания программы
end
24 слайд
Диктант по информатике:
Служебное слово для объявления массива
array
Служебное слово для описания символьной переменной
char
Функция квадратного корня
Sqrt(x)
Функция возведения в квадрат
Sqr(x)
Оператор ввода
Read, readln
Оператор установки цвета текста
Textcolor (n)
Общий вид оператора ветвления (условия)
If<условие>then<оператор1>else<оператор2>
Оператор цикла по условию, с предусловием
While (условие) do (тело цикла)
25 слайд
Концептуальная таблица
26 слайд
Домашнее задания
повторить и составить программу который нарисует дом.
Рабочие листы
к вашим урокам
Скачать
6 668 183 материала в базе
Настоящий материал опубликован пользователем Горбонос Юлия Сергеевна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Курс профессиональной переподготовки
300/600 ч.
Курс повышения квалификации
72/180 ч.
Курс профессиональной переподготовки
600 ч.
Мини-курс
4 ч.
Мини-курс
10 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.