Уроки по теме "Одномерный массив"
презентация к уроку по информатике и икт на тему

Задание
ГИА 3
.
В
таблице Ball хранятся отметки по контрольной работе (Ball[1] – отметка 1 ученика, Ball[2] – отметка 2 ученика и т.д.).
Определите
, что будет
напечатано

в результате
работы
следующей программы:
Dim Ball(
1
To 10
)
As integer
Dim
k, c
As integer
Ball(1
)=4: Ball(2)=
5
:
Ball(3
)=3: Ball(4)=
4
:
Ball(5
)=
2
Ball(6
)=
5
:
Ball(7
)=4: Ball(8)=
3
:
Ball(9
)=4: Ball(10)=
5

c = 0
FOR k = 1 TO 10
IF Ball(k) >3
And
Ball(k
)<5 THEN

c=c+1
NEXT
PRINT
c

END

Устная работа
Что такое массив?
Массив
–
это набор переменных одного типа, объединенных одним именем
.
Как обозначаются элементы массива?
Элементы массива обозначаются именем
и
индексом: А(1), А(2
).

Что делает данный оператор:
Dim

A
(1
To m
)

As

Integer

?
Объявляет указанный массив.
Что выдает функция
RND
?
RND
выдает
случайные
числа
из
интервала от 0 до
1
Что делает функция
Int
?
Функция I
NT
выделяет целую часть числа:
INT

(9.5
) =
9
Задание
ГИА 2.

В таблице
Dat

хранятся данные
ежедневных измерений температуры воздуха
(
Dat
(1)
–
температура в
понедельник,
Dat
(2)
–
во
вторник и т.д.).

Что
будет напечатано в результате работы программы?
Программа
:
DIM Dat(
1
To 7
)
As integer
DIM k,
day
As integer
Dat(1
) = 9: Dat(2) = 11
:
Dat(3) = 10: Dat(4) = 13
Dat(5) = 8: Dat(6) = 5
:
Dat(7) = 11
day = 0
FOR k = 1 TO 7
IF Dat(k) <= 10
THEN
day = day+1
NEXT
PRINT
day
Проверка письменного задания
Задача
.

Дан одномерный массив
В(10)
:
10, 31, 28, 31, -24, 73, 31, -90, 1, 120.
Составьте программу, которая найдет количество элементов, значения которых равны 31.
Программа:
Dim K, i
As Integer
Dim B (1 To 10) As Integer
B(1)=10 : B(2
)=31
: B(3)=28 : B(4
)=
31

: B(5)=-24 : B(6)=73
B(7
)=
31

: B(8)=-90 : B(9)=1 : B(10)=12
K=0
For
i =1 To
10
If B(i)=31 Then

K=K+1
Next
Print “
количество элементов, равных 31

равно
”
K
Задание ГИА 1
.
С помощью функций
Rnd
и
Int
массив
В(20)
заполнен целыми числами из интервала от 1 до 1000:

Int
(
Rnd
*1000).

Перед вами блок-схема и программа.
Какое значение
M

напечатает программа при выполнении?
M=B(1
)
Ввод элементов массива
B(i)>
M
?
M=B(i
)
да
нет
Программа
:
Dim i, M As Integer
Dim B (1 To 20) As Integer
For i =1 To 20
B(i)= Int(Rnd*1000)
Next
M
=B(1)
For i =
2
To 20
If B(i) >
M
Then
M
= B(i)
Next
Print
M
Задание

на самоподготовку
1). Повторить конспект «Одномерный массив».
2). Выполнить
письменное задание.
Задача.
С помощью функций
Rnd
и
Int
заполнить массив
В(20)
целыми числами из интервала от 1 до
10:

Int
(
Rnd
*10)
.
Составить
программу, которая найдет
минимальный
элемент
(
Min
)
массива и его индекс.
7). Объясните, какие числа будут присвоены элементам массива
А(15)
в результате выполнения фрагмента программы:
For
i =1 To
1
5
A(i)=
Int(Rnd*10
00
)
Next
8).
Объясните, какие числа будут присвоены элементам массива
B
(1
0
)

в результате выполнения фрагмента программы:
For
i =1 To 10
B(i
)=
(
Int(Rnd*10)
)/
10
Next
Задание ГИА
5
.
В
таблице A хранятся
данные о количестве призеров олимпиады по программированию.
Определите,
что будет напечатано

в
результате работы

программы:
DIM A(
1
To 9
) As integer
DIM
k,
scor
As integer
A(1
)=9: A(2)=11
:
A(3)=7: A(4)=12
:
A(5)=
13
A(6
)=
5
:
A(7
)=9: A(8)=3
:
A(9)=4
scor=0
FOR k = 1 TO 9
IF A(k) <
7

THEN

scor=scor+A(k
)
NEXT k
PRINT
scor
END
Какие способы заполнения массива вы знаете?
Заполнение
с помощью оператора присваивания:
Dat(1
)=7: Dat(2)=
9
:
Dat(3
)=10: Dat(4)=8
Заполнение с
клавиатуры:

 
Числовые значения элементам массива вводятся с клавиатуры с помощью оператора
InputBox
.


For i=1 To 10
A(
i
)=
InputBox
(“Введите число”)
Next
Заполнение
с помощью

функций
RND:
 
For i =1 To
3
A
(
i
)=
Rnd
Next


Задание
ГИА 4
.
В
таблице
A
хранятся
данные о количестве призеров олимпиады по программированию.
Определите
,
что
будет напечатано

в
результате работы

программы:
Dim A(1 To 9) As integer
Dim
k
,
SC
As
integer
A(1
)=6: A(2)=
11
:
A(3
)=7: A(4)=
12
:
A(5
)=
13
A(6
)=
5
:
A(7
)=9: A(8)=
3
:
A(9
)=4
SC=0
FOR k = 1 TO 9

IF
A(k)
>
10
THEN

SC

=

SC+A(k
)
NEXT
PRINT SC
END