Реферат: Массивы. Основные алгоритмы обработки массивов на примере языка программирования Pascal
2.3 Поиск требуемого элемента в массиве
Общий алгоритм поиска в массиве определенного элемента можно представить следующим образом:
 |
Рисунок 1. Блок-схема поиска требуемого элемента в массиве
Например,
Дан одномерный массив из 7 ячеек. Определить, сколько в нем чисел кратных 7.
Var
mas:array[1..7] of integer;
i:integer; {необходима для перебора массива}
kol:integer; {количество подходящих элементов}
begin
for i:=1 to 7 do
begin
write(‘Введите’ ,i, ‘ элемент’);
readln(mas[i]); {заполняем массив}
if (mas[i] mod 7 =0) and (mas[i]<>0) then kol:=kol+1
{если элемент делится на 7 и в остатке ноль и при этом сам элемент не равен нулю, то увеличиваем счетчик kol}
end;
writeln(“Количество чисел кратных 7 -”, kol) {вывод результата}
end.
Ход выполнения:
| 9 | -7 | 0 | 14 | 5 | 21 | -5 |
Элементы |
| 1 | 2 | 3 | 4 | 5 | 6 | 7 |
Индексы |
Введенный массив
|
i = |
Readln(mas[i]) |
Проверка (mas[i] mod 7 =0) and (mas[i]<>0) |
Действие | |
|
К-во Просмотров: 922
Бесплатно скачать Реферат: Массивы. Основные алгоритмы обработки массивов на примере языка программирования Pascal
|