это обозначаемая одним именем последовательность однотипных элементов. Массив -

Память компьютера Описание массивов имя_массива: array[индекс1..индексN] of тип_элементов ; Var A: array[1..9] of integer; А Индекс1 – номер первого элемента массива ИндексN – номер последнего элемента массива

Память компьютера Описание массивов Var B: array[-4..4] of real; имя_массива: array[индекс1..индексN] of тип_элементов ; B

Память компьютера Описание массивов Var C: array[7..17] of real; имя_массива: array[индекс1..индексN] of тип_элементов ; C

Как работать с элементом массива? Пример: Var A: array[1..9] of integer; А А[1]А[1]А[5]А[5]А[9]А[9] А[2]:=10 10 А[7]:=25 25

Примеры: Var mas: array[4..10] of real; a:integer; mas Как работать с элементом массива? a:=2; mas[4]:=5; mas[5]:=a/mas[4]; a

Ввод и вывод элементов массива Цель: формирование понятия о массиве данных. Изучить способы ввода и вывода данных в одномерный числовой массив.

Пример 1 Сохранить в памяти компьютера числа 2, 3, 5, 7, 11, 13, 17, 19. Память компьютера Const A: array[1..8] of integer = = (2, 3, 5, 7, 11, 13, 17, 19); А

Ввод элементов массива, которые не изменяются в задаче, осуществляется в разделе программы Const. Program z1; Uses crt; Const A:array[1..8] of integer = (2, 3, 5, 7, 11, 13, 17, 19); Var i:integer; Begin End.

Пример 2 Сохранить в памяти компьютера отметки по информатике 25 учащихся (отметки вводятся с клавиатуры). Память компьютера Var A: array[1..25] of integer; А 123…232425

Ввод элементов массива с клавиатуры Для ввода с клавиатуры используются стандартные процедуры read() или readln(), а также цикл For. For i:=k to n do begin readln(A[i]) ; end; k – номер первого элемента массива, n – номер последнего элемента массива

Ввод элементов массива с клавиатуры Пример 2 Сохранить в памяти компьютера отметки по информатике 25 учащихся (отметки вводятся с клавиатуры). Program z1; Uses crt; Var A:array[1..25] of integer; i:integer; Begin For i:=1 to 25 do begin readln(A[i]) ; end; End.

Пример 3 Сохранить в памяти компьютера значения функции y = x 2, где аргумент х изменяется от -5 до 5 с шагом +1. x y Память компьютера Var Y: array[-5..5] of integer; Y …345

Программное формирование массива Для программного формирования массива используется команда := и цикл For. For i:=k to n do begin A[i]:=w ; end; k – номер первого элемента массива, n – номер последнего элемента массива w – арифметическое выражение или число

Программное формирование массива Пример 3 Program z2; Uses crt; Var Y:array[-5..5] of integer; x:integer; Begin For x:=-5 to 5 do begin Y[x]:=x*x ; end; End. Сохранить в памяти компьютера значения функции y = x 2, где аргумент х изменяется от -5 до 5 с шагом +1.

Пример 4 Создать массив из 20 элементов и заполнить его случайными целыми числами, принадлежащими промежутку [0; 9]. Память компьютера Var A: array[1..20] of integer; А 123…181920

Задание значений элементов массива случайным образом Случайные значения элементов массива задаются с помощью функции random 1. Функция random (без аргумента) генерирует случайные вещественные числа в интервале [0,1). 2. Целые случайные числа из промежутка [0; n] генерирует функция random(n+1). 3. Если целочисленные элементы массива должны принадлежать промежутку [a; b], то их значения вычисляют по формуле: X[i] := random(b – a + 1) + a; 4. Для заполнения массива вещественными числами в промежутке, например, [0;11) можно использовать сумму A[i] := random + random(11).

Задание значений элементов массива случайным образом For i:=k to n do begin A[i]:=random(x); end; k – номер первого элемента массива, n – номер последнего элемента массива x – целое число

Задание значений элементов массива случайным образом Пример 4 Создать массив из 20 элементов и заполнить его случайными целыми числами, принадлежащими промежутку [0; 9]. Program z3; Uses crt; Var A:array[1..20] of integer; i:integer; Begin For i:=1 to 20 do begin A[i]:=random(10) ; end; End.

Вывод элементов массива Для вывода массива с памяти компьютера используются стандартные процедуры Write() или Writeln(), а также цикл For. For i:=k to n do begin Write(A[i]); end; k – номер первого элемента массива, n – номер последнего элемента массива For i:=n downto k do begin Writeln(A[i]); end; стр. 27 пример

Сформируйте в памяти компьютера целочисленный массив, содержащий квадраты натуральных чисел от 1 до 6. Задача Память компьютера M

M Program z4; Uses crt; Var i:integer; M: array [1..6] of integer; Begin For i:=1 to 6 do begin M[ i ]:=i * i; end; For i:=1 to 6 do begin Write(M[ i ], ); end; End. Память компьютера i Окно ввода/вывода

§ 6 стр до примера 3, упр. 2 стр. 32