Последовательный поиск в массиве начала программирования

массива
- последовательный поиск

равно заданному значению

Взять верхнюю карточку, записать на доске
(запомнить) число как наибольшее.

2) Взять следующую карточку, сравнить числа. Если
на карточке число больше, то записать это число.

Нахождение наибольшего элемента
в стопке карточек с записанными числами:

Повторить действия, описанные в пункте 2 для всех
оставшихся карточек

!

integer;
a:array[1...10] of integer;
begin 
s:=0;
for i:=1 to 10 do a[i]:=random(50);
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.

заданному, может быть:

n - индекс элемента массива такой, что a[n]= x, где х - заданное число;
сообщение о том, что искомого элемента в массиве не обнаружено.

Здесь:
трём равен 4-й элемент;
десяти равны 1-й и 9-й элементы;
нет элемента, равного 12.

условию.

program  n_4;
var n, i: integer;
a:array[1...10] of integer;
begin 
for i:=1 to 10 do a[i]:=random(60);
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.

i:=1 to 10 do a[i]:=random(60);
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.

В программе найден первый из элементов, удовлетворяющих условию.

Поиск элемента, равного 50

каждый раз, когда найден нужный элемент.

program  n_6;
var k, i: integer;
a:array[1...10] of integer;
begin 
for i:=1 to 10 do a[i]:=random(60);
for i:=1 to 10 do write (a[i],` `);
k:=0;
for i:=1 to 10 do
if a[i]>50 then k:=k+1;
write('k=', k)
end.

a:array[1...10] of integer;
begin 
for i:=1 to 10 do a[i]:=random(60);
for i:=1 to 10 do write (a[i],` `);
s:=0;
for i:=1 to 10 do
if a[i]>10 and (a[i]<30 then s:=s+a[i];
write(‘s=', s)
end.

присваивая элементам некоторые значения. При заполнении массива и его выводе на экран используется цикл с параметром.
Решение разнообразных задач, связанных с обработкой массивов, базируется на таких типовых задачах, как:
- суммирование элементов массива;
- поиск элемента с заданными свойствами;
- сортировка массива.

Массив - это поименованная совокупность однотипных элементов, упорядоченных по индексам, определяющим положение элементов в массиве. В языках программирования массивы используются для реализации таких структур данных, как последовательности и таблицы.
Перед использованием в программе массив должен быть описан. Общий вид описания одномерного массива:
var <имя_массива>: array [<мин_знач_индекса> …
<макс_знач_индекса>] of тип_элементов;

Самое главное

program a8;
var i, k: integer;
a: array [1..7] of integer;
begin
k := 0;
for i :=1 to 7 do a[i] := i*3;
for i :=1 to 7 do
if a[i] > 10 then k := k + 1;
writeln (‘k=’, k);
end.

Объявлен набор в школьную баскетбольную команду. Известен рост каждого из N учеников, желающих попасть в эту команду. Запишите на языке Паскаль программу подсчёта количества претендентов, имеющих шанс попасть в команду, если рост игрока команды должен быть не менее 170 см.
Считайте рост претендента в команду случайным числом из диапазона от 150 до 200 см, а число претендентов N = 50.

Дан массив из десяти целых чисел. Определите, сколько элементов этого массива имеют максимальное значение.

В классе 20 учеников писали диктант по русскому языку. Напишите программу, подсчитывающую количество двоек, троек, четвёрок и пятёрок, полученных за диктант.

В целочисленных массивах a и b содержатся длины катетов десяти прямоугольных треугольников (a[i] — длина первого катета, b[i] — длина второго катета i-го треугольника). Найдите треугольник с наибольшей площадью. Выведите его номер, длины катетов и площадь. Предусмотрите случай, когда таких треугольников несколько.

Проанализируйте представленный в форме блок-схемы алгоритм и укажите результат его выполнения при заданном входном потоке данных:
-5, 3, 1, -4, -3, 2, 5, -1, -7, 4
Запишите соответствующую программу на языке программирования Паскаль.

От острова Буяна до царства славного Салтана месяц пути. Капитан корабля записывает в вахтенный журнал количество миль, пройденных за день. Составьте блок-схему алгоритма для определения, в какую из трёх десятидневок пройден больший путь. Напишите соответствующую программу на языке Паскаль.

по индексам, определяющим положение элементов в массиве.
var <имя_массива>: array [<мин_знач_индекса> .. <макс_знач_индекса>] of тип_элементов;

Присваивание значений

Заполнение массива

Суммирование элементов

Сортировка элементов массива

Поиск элемента во свойствам

Задачи по обработке массива