Одномерный массив. Решение задач

Слайд 2

09/04/2023 1. Составьте программу для решения задачи: В массиве А(8) найдите

09/04/2023

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

Слайд 3

09/04/2023 2. В массиве B(10) найдите количество элементов, значение которых входит

09/04/2023

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

Слайд 4

09/04/2023 3. В массиве A(10) найдите количество элементов с четными индексами,

09/04/2023

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

Слайд 5

09/04/2023 4. Дан массив Е(12). Найдите количество элементов с нечетными индексами,

09/04/2023

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

Слайд 6

09/04/2023 5. В массиве A(10) найдите количество положительных элементов с четными

09/04/2023

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