Нахождение КОЛИЧЕСТВА заданных элементов массива

*
Разработка: Клинковская М.В. - учитель информатики и ИКТ МОУ гимназии № 7 г. Балтийска
1. В массиве А(8) найдите количество элементов, значение которых равно 5.
DIM A(8)
FOR I = 1 TO 8
INPUT A(I)
NEXT I
K=0
FOR I = 1 TO 8
IF A(I) = 5 THEN K = K+1
NEXT I
PRINT K
4
5
2
7
5
5
3
1
Ответ: 3

*
Разработка: Клинковская М.В. - учитель информатики и ИКТ МОУ гимназии № 7 г. Балтийска
2. В массиве B(10) найдите количество элементов, значения которых входят в промежуток (-3;5]. Результат выведите на экран.
DIM B(10)
FOR I = 1 TO 10
INPUT B(I)
NEXT I
K=0
FOR I = 1 TO 10
IF B(I) > -3 AND B(I) <=5 THEN K = K+1
NEXT I
PRINT K

*
Разработка: Клинковская М.В. - учитель информатики и ИКТ МОУ гимназии № 7 г. Балтийска
3. В массиве A(10) найдите количество элементов с четными индексами, значения которых входят в промежуток [-2;7).
DIM A(10)
FOR I = 1 TO 10
INPUT A(I)
NEXT I
K=0
FOR I = 2 TO 10 STEP 2
IF A(I) >= -3 AND A(I) <=7 THEN K = K+1
NEXT I
PRINT K

*
Разработка: Клинковская М.В. - учитель информатики и ИКТ МОУ гимназии № 7 г. Балтийска
4. Дан массив Е(12). Найдите количество элементов с нечетными индексами, значения которых входят в промежуток (-4;3]. Результат выведите на экран.
DIM E(12)
FOR I = 1 TO 12
INPUT E(I)
NEXT I
K=0
FOR I = 1 TO 12 STEP 2
IF A(I) >= -4 AND A(I) <=3 THEN K = K+1
NEXT I
PRINT K

Разработка: Клинковская М.В. - учитель информатики и ИКТ МОУ гимназии № 7 г. Балтийска
5. В массиве A(10) найдите количество положительных элементов с четными индексами.
DIM A(10)
FOR I = 1 TO 10
INPUT A(I)
NEXT I
K=0
FOR I = 2 TO 10 STEP 2
IF A(I) >0 THEN K = K+1
NEXT I
PRINT K

*
Разработка: Клинковская М.В. - учитель информатики и ИКТ МОУ гимназии № 7 г. Балтийска
Задание на дом:
2. Записи в тетради: повторить разобранные на уроке задачи.
Уметь решать подобные задачи.
1. Составить программу для решения задачи:
В массиве A(12) найдите количество положительных элементов с нечетными индексами и количество элементов, значение которых равно 8 среди элементов с четными индексами.