Одномерный массив

Содержание

Слайд 2

Устная работа Что такое массив? Массив – это набор переменных одного

Устная работа

Что такое массив?
Массив – это набор переменных одного типа, объединенных

одним именем.
Как обозначаются элементы массива?
Элементы массива обозначаются именем
и индексом: А(1), А(2).
Что делает данный оператор: Dim A(1 To m) As Integer ?
Объявляет указанный массив.
Что выдает функция RND?
RND выдает случайные числа из интервала от 0 до 1
Что делает функция Int?
Функция INT выделяет целую часть числа: INT (9.5) = 9
Слайд 3

Какие способы заполнения массива вы знаете? Заполнение с помощью оператора присваивания:

Какие способы заполнения массива вы знаете?
Заполнение с помощью оператора присваивания:
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

7). Объясните, какие числа будут присвоены элементам массива А(15) в результате

7). Объясните, какие числа будут присвоены элементам массива А(15) в результате

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

Задание ГИА 1. С помощью функций Rnd и Int массив В(20)

Задание ГИА 1. С помощью функций Rnd и Int массив В(20)

заполнен целыми числами из интервала от 1 до 1000: Int(Rnd*1000). Перед вами блок-схема и программа.
Какое значение M напечатает программа при выполнении?

M=B(1)

Программа:
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

Слайд 6

Задание ГИА 2. В таблице Dat хранятся данные ежедневных измерений температуры

Задание ГИА 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
Слайд 7

Задание ГИА 3. В таблице Ball хранятся отметки по контрольной работе

Задание ГИА 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
Слайд 8

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

Задание ГИА 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
Слайд 9

Задание ГИА 5. В таблице A хранятся данные о количестве призеров

Задание ГИА 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