Ввод и вывод элементов одномерного массива

Тема: Введення та виведення елементів масиву
Цель:
Учебная: проверить уровень усвоения понятий массива,
одномерного массива, индекса,
способов описания одномерных массивов, рассказать о способах заполнения и распечатки
одномерных массивов
Воспитательная: Формировать навыки принятия решений, бережное отношение к
технике и информации.
Развивающая: Формировать алгоритмический стиль мышления, развивать логическое
мышление, поддерживать постоянный интерес к исследуемому предмету и стремление к
усвоению новых знаний.
Ход урока
I.
Организационный момент
II.
Проверка домашнего задания
Фронтальный опрос и 3 ученика у доски демонстрируют условия составленных
задач, следующие 3 - их решают.
1. Определение массива
2. Перечислите характеристики массивов
3. Сколько способов описания массивов
4. Перечислите способы описания массивов
III.
Новая тема
Сегодня мы познакомимся со способами заполнения и распечатки одномерного
массива в зависимости от поставленной задачи.
1 способ
Массив описан в разделе описания const и ему присвоено начальное значение
2 способ
Всем элемента массива присвоить значение
T[1]:=5; t[2]:=-9; t[3]:=12 НЕ ЭФФЕКТИВЕН!
3 способ
Этот способ используется, если все элементы массива имеют одинаковое значение
For i:=1 to n do
T[i]:=0;
4 способ
Используется, если значения всех элементов описываются п какому-то закону
For i:=1 to n do
T[i]:=2*i-1;
5 способ
Если значения элементов массива могут быть любыми из какого-то диапазона
For i:=1 to n do
T[i]:=Random(100)-50;
0-50
6 способ
Если элементы массива должны иметь разные значения, но строго определенные
для данного запуска программы (Ввод массива с клавиатуры)
For i:=1 to n do
Begin
Write(‘T[‘,I,’=’);
Readln (T[i]);
T[1]=-3
T[2]=8
Writeln(‘введите n значений массива T’);
For i:=1 to n do
Read (T[i]);
-3 8 15 45
Распечатка одномерного массива в столбик
For i:=1 to n do
Writeln (T[I]);
Распечатка массива в строчку
For i:=1 to n do
Write (T[I]:8);
Writeln
Учебные программы обработки массивов должны содержать следующие этапы:
1. Заполнение массива значениями.
2. Распечатка исходного массива
3. Обработка массива по условию задачи
4. Печать результата
Первые 2 этапа обработки
Type
ar: array [1..100] of word;
Var
A: ar; k, m, n: integer;
Procedure Input (n: integer; Var a:ar);
Var
i: integer;
Begin
For i:=1 to n do
A[i]:=random(100);
End;
Procedure Print(n: integer; Var a:ar);
Var
i:integer;
Begin
For i:=1 to n do
Write (T[I]:8);
Writeln
End;
IV.
Практическая часть урока – набрать программу заполнения и распечатки
массива из 20 чисел случайным числом в диапазоне от 0 до 100 и распечатать
массив.
V.
Постановка домашнего задания – выучить ОК по теории урока, продумать
задачи нахождения суммы и произведения элементов массива.
VI.
Рефлексия
1.
2.
3.
4.
5.
6.
7.
8.
Перечислите способы заполнения массива
Перечислите способы распечатки массива
Каким образом в Паскале вызывают процедуру?
Что являлось формальными параметрами в процедурах заполнения и распечатки
массива в нашей задаче?
Что называют массивом?
Каким образом можно осуществить перебор значений элементов массива?
Как организовать суммирование значений элементов массива?
Как осуществить увеличение произведения элементов массива?