Преобразование элементов массива

Тема раздела: Основы алгоритмизации и программирования

Тема урока: Преобразование элементов массива

Цели:

1. Познакомить учащихся с преобразованием элементов массива: замена элементов, удовлетворяющих определенному условию, перестановка (обмен местами) двух элементов; формировать умение выполнять преобразование элементов массива

2. Развивать у учащихся логико-алгоритмическое мышление, умение выделять главное в изученном материале, сравнивать, обобщать

3. Воспитывать дисциплинированность, собранность, сознательность, ответственность за сохранность школьного имущества

Оборудование: класс компьютерной техники, доска, карточки с заданиями

План урока:

1. Организационный момент (1 - 2 минуты)

2. Этап повторения изученного материала (5 - 7 минут)

3. Этап изучения нового материала (15 - 20 минут)

4. Домашнее задание (1 - 2 минуты)

5. Закрепление изученного материала (15 минут)

6. Подведение итогов (2 - 3 минут)

Ход урока.

1. Здороваюсь. Концентрирую внимание учащихся, предлагаю им сесть, проверяю отсутствующих.

2. Выполняют тестовое задание (до 3 мин.) Правильно выполненный тест оценивается в 3 балла. Одно правильно выполненное задание оценивается в 0,6 балла.

1. Что называют массивом?

1. Результат работы программы

2. Обозначаемая одним именем последовательность однотипных элементов

3. Диапазон индексов, определяющий максимально возможное количество элементов

1. Сколько элементов содержится в массиве var c: array [3..10] of integer;

1. 8;

2. 9;

3. 10;

4. 7;

5. 3;

1. Как правильно сгенерировать целые случайные числа из промежутка [10,25]?

1. Random

2. Random (34)-10

3. Random (16)+10

4. Random (10)+random(25)

1. Из предложенного списка, выберите функцию округления, которая возвращает значения целого типа:

1. Random()

2. Writeln()

3. Round()

4. Integer

1. После выполнения программы с использованием функции round() в какой из предложенных массивов могут быть записаны полученные 9 элементов?

1. C: array [1..9] of integer

2. C: array [1…9] of integer

3. C: array [-1..6] of integer

4. C: array [1..9] of real

5. C: array [1…9] of real

После выполнения разбираем написанный тест и указываем правильные ответы(3 мин.)

1. Ребята, на прошлом занятии вы начали изучать тему «Преобразование элементов массива». Эти знания нам понадобятся сегодня, так как мы продолжаем изучать данную тему. В некоторых задачах требуется выполнить преобразования не всех элементов массива, а лишь удовлетворяющих определённым условиям, например с отрицательными, четными значения или значениями, кратными заданному числу.

Давайте рассмотрим задачу: Составить программу, которая формирует массив из 15 случайных чисел, принадлежащих промежутку [-8; 16], заменяет положительные числа на 17 и выводит значения элементов массива до и после замены.

Давайте составим код программы этой задачи на доске. С чего начинается любая программа, составленная на языке программирования Pascal ABC? (с служебного слова program и имени программы). Какие ограничения мы накладываем на имя программы? (не должно начинаться с цифры и должно содержать латинские символы).

Program zamena;

Далее рассуждаем по условию программы. Что мы делаем следующим шагом? (задаем массив) В каком блоке мы его задаем? (в блоке описания). Как мы его задаем?

Var C: array [1..15] of integer

Так как у нас 15 элементов массива, то что нам еще нужно? (счетчик). Где и как мы ее зададим? (так же в блоке описания)

i: integer;

Хорошо, что мы делаем дальше? (пишем операторные скобки begin end.) что дальше нам нужно сделать? (заполнить массив случайными числами) С помощью какого цикла мы будем заполнять массив? (с помощью цикла for). При помощи какой функции мы будем заполнять массив случайными числами? (random)

For i:=1 to 15 do C[i] := random(25)-8;

Теперь что нам надо сделать? (вывести элементы массива) как мы это будем делать? (при помощи процедуры write (чем отличается write от writeln? – writeln каждый символ выводит с новой строчки))

For i:=1 to 15 do write(C[i]:4); (означает, что между символами будет отступ на 4 отступа)

Далее мы заменяем положительные числа на 17. Как мы это будем делать? (при помощи оператора if)

If C[i]0 then C[i]:=17; а теперь выводим полученный массив.

For i:=1 to 15 do write(C[i]:4);

End.

(полный код программы)

Program zamena;

Var C: array [1..15] of integer

i: integer;

Begin

For i:=1 to 15 do C[i] := random(25)-8;

For i:=1 to 15 do write(C[i]:4);

If C[i]0 then C[i]:=17;

For i:=1 to 15 do write(C[i]:4);

End.

Может теперь вы приведете условие задачи с подобной заменой? (приводят примеры)

Аналогичным способом производится замена элементов массива по иным условиям, например:

• Замена всех нечетных значений элементов массива квадратами их номеров: if A[i] mod 2 = 1 then A[i]:=sqr(i);

• Замена всех отрицательных чисел их квадратами, а неотрицательных – значениями квадратного корня: if A[i]then A[i]:=sqr (A[i]) else A[i]:=sqrt (A[i]); но при использовании функции sqrt() какие значения получаются? (вещественные) Какой требуется для них тип массива? (требуется тип массива real). Что нужно сделать, чтобы можно было использовать тип integer? (использовать функцию округления round()).