Сумма выбранных элементов. Поиск элемента в массиве

Слайд 2

Сумма выбранных элементов

начало

конец

нет

да

нет

да

S:= 0
i:= 1

S:= S + A[i]

i:= i +

Сумма выбранных элементов начало конец нет да нет да S:= 0 i:=
1

пока ни одного не нашли

начать с 1-ого

перейти к следующему

нашли еще 1

Слайд 3

Сумма выбранных элементов

program qq;
const N = 5;
var A: array [1..N] of integer;

Сумма выбранных элементов program qq; const N = 5; var A: array
i, S: integer;
begin
{ здесь надо заполнить массив }
S:= 0;
for i:=1 to N do
if A[i] = 0 then count:= count + 1;
writeln('Cумма полож. элементов: ', S);
end.

for i:=1 to N do
if A[i] > 0 then S:= S + A[i];

перебираем все элементы массива

Слайд 4

Задания

«3»: Заполнить массив из 10 элементов случайными числами в интервале [-10,10] и

Задания «3»: Заполнить массив из 10 элементов случайными числами в интервале [-10,10]
подсчитать сумму всех отрицательных элементов.
«4»: Заполнить массив из 10 элементов случайными числами в интервале [0,100] и подсчитать среднее значение всех элементов, которые <50.
«5»: Заполнить массив из 10 элементов случайными числами в интервале [10,12] и найти длину самой длинной последовательности стоящих рядом одинаковых элементов.

Пример:
Исходный массив:
10 10 11 12 12 12 10 11 11 12
Длина последовательности: 3

Слайд 5

Практикум 1: суммы, произведения…

«3»: 1. Вычислить сумму всех элементов массива A.
2. Вычислить

Практикум 1: суммы, произведения… «3»: 1. Вычислить сумму всех элементов массива A.
сумму отрицательных элементов массива A.
3. Вычислить сумму всех элементов массива A, которые делятся на 3.
«4»: 4. Вычислить среднее арифметическое всех элементов массива A, которые меньше, чем 50.
5. Вычислить произведение всех чётных положительных элементов массива A.
«5»:
6. Найти сумму всех элементов массива A, у которых число десятков (вторая с конца цифра десятичной записи) больше, чем число единиц.
7. Все элементы массива A - трёхзначные числа. Найти сумму всех элементов массива A, в десятичной записи которых все цифры одинаковые.

Слайд 6

Поиск в массиве

Задача – найти в массиве элемент, равный X, или установить,

Поиск в массиве Задача – найти в массиве элемент, равный X, или
что его нет.
Пример: если в классе ученик с фамилией Пупкин?
Алгоритм:
начать с 1-ого элемента (i:=1)
если очередной элемент (A[i]) равен X, то закончить поиск
иначе перейти к следующему элементу:

Слайд 7

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

начало

конец

нет

да

нет

да

i:= 1

i:= i + 1

начать с 1-ого

перейти к следующему

‘Не

Поиск элемента, равного X начало конец нет да нет да i:= 1
нашли’

‘Есть!’

Слайд 8

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

program qq;
const N=10;
var a:array[1..N] of integer;

Поиск элемента в массиве program qq; const N=10; var a:array[1..N] of integer;
i, X: integer;
begin
writeln('Исходный массив:');
for i:=1 to N do
begin
A[i] := random(100) + 50;
write(A[i]:4);
end;
writeln;
write('Какое число Вы хотите найти: ');
read(X);

Слайд 9

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


i:=1;
while (i<=N) and (A[i]<>X) do
i:=i+1;

Поиск элемента в массиве i:=1; while (i X) do i:=i+1; if i
if i <= N then
writeln('A[', i, ']=', X)
else writeln('Не нашли...');
end.
Имя файла: Сумма-выбранных-элементов.-Поиск-элемента-в-массиве.pptx
Количество просмотров: 58
Количество скачиваний: 0