Видеоурок №2 в 9 классе по теме "Линейный поиск в массиве".

Линейный поиск в массиве

К.Ю.Поляков, Е.А.Еремин

9 класс. § 20 стр 158-159

Видеоурок № 2(массивы) в 9 классе

Гаврюкова Г.А. школа № 68 Рязань 2021

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

program Summa;

const N = 5 ;

var A: array [ 1. .N] of integer ;

i,S: integer ;

begin

writeln ( 'Элементы Вашего массива:' );

for i:= 1 to N do

begin

A[i]:= random( 9 );

writeln( ' A[' ,i, ']=' ,A[i] );

end ;

S:= 0 ;

for i:= 1 to N do

S:= S + A[i];

writeln ( 'Сумма= ' , S );

end .

5

2

8

3

1

1

2

3

4

5

i

Sum

0

5

1

7

2

15

3

18

4

19

5

Визуализация постепенного накопления результата

program Summa1;

const N = 6 ;

var A: array [ 1. .N] of integer ;

i,S: integer ;

begin

writeln ( 'Элементы Вашего массива:' );

for i:= 1 to N do

begin

A[i]:= random( 9 );

writeln( ' A[' ,i, ']=' ,A[i] );

end ;

writeln ( ' Визуализация накопления суммы' );

S:= 0 ;

for i:= 1 to N do

begin

S:= S + A[i];

write ( ' S = ' , S);

end ;

writeln ( ' Ответ: сумма= ' , S );

end .

Элементы Вашего массива:

A[1]=4

A[2]=3

A[3]=1

A[4]=5

A[5]=1

A[6]=3

Визуализация накопления суммы

S = 4 S = 7 S = 8 S = 13 S = 14 S = 17

Ответ: сумма= 17

0 да S:= S + A[i] Вывод ‘S =‘, S конец " width="640"

№ 1: Программа, которая заполняет массив из 7 элементов случайными числами на отрезке [–5; 5] и находит сумму положительных элементов.

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

по условию

начало

(Запись в тетрадь)

Ввод/Вывод A[7]

S:=0

for i:=1 to 7 do

A[i] 0

да

S:= S + A[i]

Вывод ‘S =‘, S

конец

№ 1: Сумма элементов по условию

4

0 да P:= P * A[i] Вывод ‘P =‘, P конец 4 " width="640"

№ 2 Алгоритм, который заполняет массив из 7 элементов случайными числами на отрезке [–5; 5] и находит произведение положительных элементов

начало

Ввод/Вывод A[7]

P:=1

for i:=1 to 7 do

A[i] 0

да

P:= P * A[i]

Вывод ‘P =‘, P

конец

4

№ 3 Подсчёт элементов по условию

Найти количество чётных элементов массива

(Запись в тетрадь)

начало

Ввод/Вывод A[7]

переменная-счётчик

count:=0

for i:=1 to 7 do

Критерий четности числа

A[i] mod 2 = 0

да

count:= count+1

Вывод count

конец

6

№ 3 Подсчёт элементов по условию

Найти количество чётных элементов массива

program count1;

const N = 6 ;

var A: array [ 1. .N] of integer ;

i,count: integer ;

begin

writeln ( 'Элементы Вашего массива:' );

for i:= 1 to N do

begin

A[i]:= random( 9 );

writeln( ' A[' ,i, ']=' ,A[i] );

end ;

writeln ( ' Чётные элементы' );

count:= 0 ;

for i:= 1 to N do

if A[i] mod 2 = 0 then

begin

count:= count+ 1 ;

write ( ' A[' ,i, ']=' ,A[i] );

end ;

writeln ( ' количество чётных= ' , count );

end .

Элементы Вашего массива:

A[1]=0

A[2]=8

A[3]=3

A[4]=1

A[5]=5

A[6]=7

Чётные элементы

A[1]=0 A[2]=8

количество чётных= 2

Линейный поиск в массиве (стр 158) Найти в массиве заданное значение или определить, что его там нет

7

Задачи

№ 1 Напишите программу, которая заполняет массив из 20 элементов случайными числами на отрезке [0; 200] и считает число двузначных чисел в массиве.

№ 2 Напишите программу, которая заполняет массив из 20 элементов случайными числами на отрезке [0; 200] и определяет есть ли там двузначные числа.

№ 3 Напишите программу, которая заполняет массив из 20 элементов случайными числами на отрезке [10; 100] и считает число пар соседних элементов, сумма которых делится на 3.

Линейный поиск в массиве

К.Ю.Поляков, Е.А.Еремин

9 класс. § 20 стр 158-159

Видеоурок № 2(массивы) в 9 классе

Гаврюкова Г.А. школа № 68 Рязань 2021