ПЛАН УРОКА
Тема урока: Понятие о массивах, стандартные алгоритмы обработки массивов Школа: СШ№23 им. М.Козыбаева
Дата: 07.12.2016 г.
ФИО учителя: Архипова Г.Ю.
КЛАСС: 9В,А,Б (1 группы)
Количество присутствующих:
Количество отсутствующих:
Цели обучения, которые необходимо достичь на данном уроке
Научить применять одномерный массив при решении задач на языке Паскаль АВС
Цели обучения
Все учащиеся:
Большинство учащихся:
Некоторые учащиеся:
Предыдущее обучение
Учащиеся знают такие понятия как массив, одномерный массив, знают, как обозначается массив и записывается на языке Паскаль АВС, знают характеристики массива, умеют определять размерность массива
План
Планируемые сроки
Планируемые действия (замените записи ниже запланированными действиями)
Ресурсы
Начало урока
Организационный момент (2 минуты)
Приветствие учащихся, проверка готовности учащихся, и присутствующих.
Актуализация базовых знаний (8 минуты)
Фронтальный опрос:
15 2
44
6
5
11
-7
8
9
презентация
Середина урока
Изучение нового материала (15 минут)
Рассмотрим задачу.
При выполнении заданий на формирование массива можно считать, что размер результирующего массива не превосходит 10.
Задача 1.
Дан массив размера N. Вывести его элементы в обратном порядке.
Не забываем про то, что циклом for можно пробегать числа не только от меньших к большим, но от больших к меньшим.
program array7;
var
a: array[1..10] of integer;
N, i: integer;
begin
write('Введите N: ');
readln(N);
write('Введите элементы массива:');
for i := 1 to N do
read(a [i]);
write('Элементы в обратном порядке: ');
for i := N downto 1 do write(a[i],' ')
end.
Задача 2.
Дан массив размера N и целые числа K и L (1 ≤ K ≤ L ≤ N). Найти сумму элементов массива с номерами от K до L включительно.
program array21; var
A: array[1..10] of integer;
i, K, L, N, sum: integer;
begin
write('Введите N: ');
readln(N);
write('Введите элементы массива: ');
for i := 1 to N do
read(A[i]);
write('Введите K, L: ');
readln(K, L);
{просто выполняем то, что от нас требуется, — складываем все элементы массива с номерами от K до L.}
for i := K to L do
sum := sum + A[i];
writeln(sum);
end.
Презентация
Конец урока
Рефлексия – 9 мин.
Наш урок подходит к концу и предлагаю вам обсудить итоги урока:
Домашнее задание – 3 мин.
Запись домашнего задания (слайд 6), выставление оценок за работу на уроке