Последовательный поиск в массиве (окончание)

Программа поиска в сформированном нами массиве а значения, равного х, может выглядеть так:

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

Во многих случаях требуется найти первый из элементов, имеющих соответствующее значение, и дальнейший просмотр массива прекратить. Для этой цели можно использовать следующую программу:

i: =0 ;
repeat
i:=i+1;
until (a[i]=x) or (i=10);
if a[i]=x then write(i) else write('Heт')

Здесь выполнение алгоритма будет прервано в одном из двух случаев: 1) в массиве найден первый из элементов, равный заданному; 2) все элементы массива просмотрены.

Запишите полный текст программы и выполните её на компьютере.

Зачастую требуется определить количество элементов, удовлетворяющих некоторому условию. В этом случае вводится переменная, значение которой увеличивается на единицу каждый раз, когда найден нужный элемент.

Определите, количество каких элементов подсчитывается в следующем фрагменте программы.

k: =0;
for i:=1 to 10 do
if a[i]>50 then k:=k+1;
write ('k=', k)

Если требуется определить сумму значений элементов, то вводят переменную, к значению которой прибавляют значение найденного элемента массива.

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

s: =0 ;
for i:=1 to 10 do
if (a[i]>50) and (a[i]<60) then s:=s+a[i];
write('s=', s)

Запишите полные тексты двух последних программ и выполните их на компьютере.

<<< К началу