Коллеги - педагогический журнал Казахстана

Наша библиотека

Главная » Файлы » В помощь учителю » Информатика

Урок Подпрограммы-процедуры в Pascal.
2014-04-15, 12:51 PM
ИНФОРМАТИКА. УРОК ПО ТЕМЕ «ПОДПРОГРАММЫ В PASCAL»

Бексеитова Бакыт Алтеновна, учитель информатики,
школа-гимназия №17, г.Астана

Тема: Подпрограммы-процедуры
Цель:
Обучающая: дать понятие подпрограммы, рассказать о видах подпрограмм, обучение умению организации подпрограмм процедур
Развивающая: расширение знаний о структуре программы, методах программирования, развитие логического мышления, умений строить алгоритмы и программировать
Воспитательная: воспитание основных учебных умений, интереса к программированию
Тип урока: урок формирования знаний и умений
Вид урока: стандартный урок
Прогнозируемые результаты: уч-ся должны знать определение подпрограммы, знать преимущества использования подпрограмм, уметь организовать процедуру, знать правила соответствия между фактическими и формальными переменными
Оборудование: интерактивная доска, компьютеры, проектор
Программное обеспечение: Turbo Pascal, activ studio
План урока:
I. Организационный момент, целеполагание.
II. Повторение.
III. Подготовка к объяснению новой темы.
IV. Новая тема.
V. Решение задач
VI. Подведение итогов, комментирование оценок.
VII. Инструктаж домашнего задания.
ХОД УРОКА:
I. Организационный момент, целеполагание.
II. Повторение. Устный опрос с использованием флипчарта (стр 1)
- расставить структуру программы по порядку
- что означает каждый раздел программы
procedure …;
uses …;
end.
var …;
oператоры;
program primer1;
function …;
const …;
begin
III. На компьютере запустите TurboPascal, откройте файл 1.pas, выполните запуск программы (программа заранее подготовлена учителем).
uses graph;
var f,g: integer;
begin f:=detect; initgraph(f,g, ‘’);
setcolor(2);
moveto(300,60); lineto(440,460);
lineto(160,460); lineto(300,60);
setfillstyle(1,10); floodfill(300,200,2);
setcolor(4); circle(300,60,10);
setfillstyle(1,4); floodfill(300,60,4);
readln;
end.
В результате запуска программы на экране - изображение елочки.
Устный опрос по программе: назначение операторов графики, использованных в программе.
Постановка проблемы. Украсить елочку (программы 1.рas), выполнив несколько шаров разного цвета в разных местах елочки.
Рассмотрим решение этой задачи без подпрограммы.
Программа получается громоздкой, чем больше шаров, тем больше программа. (флипчарт стр2)
uses graph;
var f,g: integer;
begin f:=detect; initgraph(f,g, ‘’);
setcolor(2);
moveto(300,60); lineto(440,460);
lineto(160,460); lineto(300,60);
setfillstyle(1,10); floodfill(300,200,2);
setcolor(4); circle(300,60,10);
setfillstyle(1,4); floodfill(300,60,4);
setcolor(5); circle(340,200,10);
setfillstyle(1,5); floodfill(340,200,5);
setcolor(1); circle(240,280,10);
setfillstyle(1,1); floodfill(240,280,1);
setcolor(14); circle(380,360,10);
setfillstyle(1,14); floodfill(380,360,14);
setcolor(3); circle(280,140,10);
setfillstyle(1,3); floodfill(280,140,3);
setcolor(15); circle(280,240,10);
setfillstyle(1,15); floodfill(280,240,15);
setcolor(12); circle(240,420,10);
setfillstyle(1,12); floodfill(240,420,12);
readln;
end.
Последовательность одних и тех же операторов встречается несколько раз. Цикл использовать невозможно, т.к. координаты и цвета не являются параметрами цикла.
IV. Для выхода из такой ситуации существуют подпрограммы.
Оформим повторяющиеся операторы в самостоятельную программку со своим именем и своими переменными. Координаты центров окружностей и цвет шаров сделаем переменными величинами. Такую вспомогательную подпрограмму пишут в начале программы в разделе подпрограмм. (Флипчарт – стр 3)
procedure shar(x,y,c:integer);
begin setcolor( c);
circle(x,y,10); setfillstyle(1,c);
floodfill(x,y,c);
end;
Теперь будем вызывать подпрограмму по имени в основной программе, указав лишь координаты и цвет круга.
Программа готова. (флипчарт стр 4)
uses graph;
var f,g: integer;
procedure shar(x,y,c:integer);
begin setcolor( c);
circle(x,y,10); setfillstyle(1,c);
floodfill(x,y,c); readln; end;
begin f:=detect; initgraph(f,g, ‘’);
setcolor(2);
moveto(300,60); lineto(440,460);
lineto(160,460); lineto(300,60);
setfillstyle(1,10); floodfill(300,200,2);
shar(300,60,4); shar(340,200,5);
shar(240,280,1); shar(380,360,14);
shar(280,140,3); shar(280,240,15);
shar(240,420,12);
readln;
end.
Послушаем хорошую песню. Звучит песня Город-мечта. (на экране презентация с видами Астаны и текст песни)
Слова многих песен напоминают структуру программы с подпрограммой. Подпрограммой является Припев.
Давайте сделаем выводы.
Подпрограмма – специальная часть основной программы, составленная в виде отдельной программы с собственным названием, которую можно вызывать в любом месте основной программы сколько угодно раз.
Устно: Для чего нужны подпрограммы?
Может ли в одной программе использоваться несколько подпрограмм?
Подпрограммы делятся на процедуры и функции. Отличаются тем, что результатом выполнения процедуры могут быть значения нескольких переменных, а функции – только одно значение.
Все подпрограммы делятся на стандартные и нестандартные. Флипчарт 7.
Стандартные
Процедуры:
system
crt
graph
dos
и др.
Функции:
abs(x)
sqr(x)
sqrt(x)
и др
Нестандартные
Определенные пользователем

Оформление подпрограммы-процедуры. (Флипчарт – стр 8.)
procedure имя [(список параметров)];
раздел описаний
begin
операторы
end;
Глобальные и локальные параметры. Флипчарт – стр 9.
Локальные параметры записываются в заголовке процедуры и используются в подпрограмме.
Глобальные параметры – это значения или переменные, которые используются и в основной программе и в подпрограмме.
Соответствие между глобальными и локальными параметрами:
1. по количеству
2. по типу
3. по месту следования
V. Закрепление. Написать программу решения задачи: Найти максимальное из 5 чисел.
1 этап. Построение алгоритма (блок-схемы) с использованием блока подпрограммы. Подпрограммой будет являться процедура нахождения максимального из двух чисел.
2 этап. Написание программы.
Назовем процедуру сравнения sravnenie, введем локальные параметры x, y. Получим подпрограмму.
Procedure sravnenie(x,y:real);
Begin if x> y then max:=x else max:=y;
End;
Полное решение задачи
Var a,b,c,d,e,max:real;
Procedure sravnenie(x,y:real);
Begin if x> y then max:=x else max:=y;
End;
Begin readln(a,b,c,d,e);
Sravnenie(a,b); Sravnenie(max,c);
Sravnenie(max,d); Sravnenie(max,e);
Writeln(max:9:2);
Readln;
End.
VI. Подведение итогов:
Что такое подпрограмма?
Какое количество подпрограмм может присутствовать в основной программе?
Назовите виды подпрограмм
Какие параметры называют глобальными?
Какие параметры называют локальными?
Какое соответствие должно соблюдаться между глобальными и локальными параметрами?
Для чего используют подпрограммы, в чем преимущество их использования?
Ответ: Использование п/п позволяет:
• сократить объем программы;
• улучшить структуру программы с точки зрения ее читаемости и наглядности;
• облегчает процесс отладки.
VII. Инструктаж домашнего задания. 1) читать конспект урока
2) Написать программу решения задачи с использованием подпрограммы-процедуры: Даны стороны двух треугольников. Найти площадь и периметр каждого из них.
Категория: Информатика | Добавил: BakytAltenovna
Просмотров: 600 | Загрузок: 0 | Рейтинг: 0.0/0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Суббота, 2016-12-03, 3:18 AM
Приветствую Вас Гость

Форма входа

Категории раздела

Психология [165]
Педагогика [291]
Математика [775]
Физика [242]
История [335]
Классному руководителю [518]
Русский язык и литература [696]
Физическая культура [200]
Английский язык [408]
Искусство [181]
Родительский совет [14]
Биология [319]
Информатика [365]
Начальная школа [1868]
Мой Казахстан [237]
Технология [126]
Самопознание [170]
Технология труда [49]
Персональная рубрика учителя технологии труда Шукурова Суюнгали Сагинтаевич. Западно-Казахстанская область,Жанибекский район,СОШ имени Т.Жарокова
НВП и ОБЖ [40]
Профессиональное образование [155]
Дошколенок [461]
География [129]
Школьная библиотека [48]
Казахский язык и литература [542]
Химия [33]

Социальные закладк

Поиск

Друзья сайта

Академия сказочных наук

  • Театр.kz

  • Статистика

    Рейтинг@Mail.ru