Выбранный для просмотра документ Поиск в массиве_Технологическая карта.doc
Скачать материал "Урок на тему "Поиск в массиве""
Рабочие листы
к вашим урокам
Скачать
Выбранный для просмотра документ Приложение1_Поиск в массиве.ppt
Скачать материал "Урок на тему "Поиск в массиве""
Рабочие листы
к вашим урокам
Скачать
1 слайд
Последовательный поиск в массиве в языке программирования Паскаль
АЛГОРИТМИЗАЦИЯ И ПРОГРАММИРОВАНИЕ
2 слайд
Типовые задачи поиска
Нахождение наибольшего (наименьшего)
элемента массива
Нахождение элемента массива, значение
которого равно заданному значению
3 слайд
1) Взять верхнюю карточку, записать на доске
(запомнить) число как наибольшее.
2) Взять следующую карточку, сравнить числа. Если
на карточке число больше, то стереть старую запись и
записать это число.
Нахождение наибольшего элемента
в стопке карточек с записанными числами:
3) Повторить действия, описанные в пункте 2 для всех
оставшихся карточек.
При организации поиска
наибольшего элемента массива
правильнее искать его индекс.
!
4 слайд
Программа поиска наибольшего элемента в массиве
program n_4;
var i, imax: integer;
a: array[1..10] of integer;
begin
randomize;
for i:=1 to 10 do a[i]:=random(100);
for i:=1 to 10 do write (a[i],` `);
imax:=1;
for i:=2 to 10 do
if a[i]>a[imax] then imax:=i;
write ('Наибольший элемент a[', imax, ']=', a[imax])
end.
5 слайд
Нахождение элемента массива с заданными свойствами
Результатом поиска элемента, значение которого равно заданному, может быть:
n - индекс элемента массива такой, что a[n]= x, где х - заданное число;
сообщение о том, что искомого элемента в массиве не обнаружено.
Здесь:
трём равен 4-й элемент;
десяти равны 1-й и 9-й элементы;
нет элемента, равного 12.
6 слайд
Поиск элемента, равного 50
Будет найден последний из элементов, удовлетворяющих условию.
program n_5;
var n, i: integer;
a: array[1..10] of integer;
begin
randomize;
for i:=1 to 10 do a[i]:=random(100);
for i:=1 to 10 do write (a[i],` `);
n:=0;
for i:=1 to 10 do
if a[i]=50 then n:=i;
if n=0 then write('Нет') else write (i)
end.
7 слайд
Поиск элемента, равного 50
program n_5_1;
var n, i: integer;
a: array[1..10] of integer;
begin
randomize;
for i:=1 to 10 do a[i]:=random(100);
for i:=1 to 10 do write (a[i],` `);
i:=0;
repeat
i:=i+1;
until (a[i]=50) or (i=10);
if a[i]=50 then write(i) else write('Нет')
end.
Будет найден первый из элементов, удовлетворяющих условию.
Рабочие листы
к вашим урокам
Скачать
Выбранный для просмотра документ Приложение2_Типовые алгоритмы обработки одномерных массивов.doc
Скачать материал "Урок на тему "Поиск в массиве""
Рабочие листы
к вашим урокам
Скачать
Выбранный для просмотра документ Приложение3_Карточки для работы.doc
Скачать материал "Урок на тему "Поиск в массиве""
Рабочие листы
к вашим урокам
Скачать
Рабочие листы
к вашим урокам
Скачать
6 663 508 материалов в базе
Настоящий материал опубликован пользователем Вереденко Наталия Геннадьевна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Курс профессиональной переподготовки
300/600 ч.
Курс профессиональной переподготовки
300/600 ч.
Курс профессиональной переподготовки
300 ч. — 1200 ч.
Мини-курс
2 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.