1 Программирование на языке

1 Программирование на языке Паскаль Массивы

2 Массивы Массив – это группа однотипных элементов, имеющих общее имя и расположенных в памяти рядом. Особенности: • все элементы имеют один тип • весь массив имеет одно имя • все элементы расположены в памяти рядом Примеры: • список учеников в классе • квартиры в доме • школы в городе • данные о температуре воздуха за год

3 Массивы НОМЕР элемента массива (ИНДЕКС) A массив 1 2 33 4 5 5 10 15 20 25 A[1] A[2] A[3] A[4] ЗНАЧЕНИЕ A[5] элемента массива НОМЕР (ИНДЕКС) элемента массива: 2 A[2] ЗНАЧЕНИЕ Размерность массива – элемента массива: 10 количество элементов, которое содержит массив.

4 Объявление (описание) массива Зачем объявлять? • определить имя массива • определить тип массива • определить число элементов • выделить место в памяти Массив целых чисел: начальный конечный тип имя индекс элементов var A : array[ 1. . 5 ] of integer ; Var имя массива: Array [индексы] of тип элементов ;

5 Объявление (описание) массива Массив целых чисел: начальный конечный тип имя индекс элементов var A : array[ 1. . 5 ] of integer ; Размер через константу: const N=5; var A: array[1. . N ] of integer; В разделе описания типов Type имя типа = Array [индексы] of тип элементов ; Var имя массива : имя типа ;

6 Способы заполнения массивов Ввод массива с клавиатуры : For i: =1 to n do Read (A[ i ]); Ввод массива оператором случайных чисел Random [a; b] (a; b) For i: =1 to n do A[ i ] : = Random (b-a+1)+a; A[ i ] : = Random (b-a)+a; Ввод массива по формуле For i: =1 to n do A[i]: =i*2;

7 Вывод массива В строку В столбец For i: =1 to n do Write (a[i]: 4); Writeln (a[i]); Задача : Заполнить массив действительных чисел В[30] случайными числами из отрезка [-6; 55] и вывести его в строку на экран.

8 Объявление массивов Массивы других типов: var X, Y: array [1. . 10] of real; C: array [1. . 20] of char; Другой диапазон индексов: var Q: array [0. . 9] of real; C: array [-5. . 13] of char; Индексы других типов: var A: array ['A'. . 'Z'] of real; B: array [False. . True] of integer; . . . A['C'] : = 3. 14259*A['B']; B[False] : = B[False] + 1;

9 Массивы Объявление: const N = 5; var a: array[1. . N] of integer; i: integer; Ввод с клавиатуры: a[1] = 5 for i: =1 to N do begin write('a[', i, ']='); a[2] = 12 ? Почему read ( a[i] ); a[3] = 34 write? a[4] = 56 end; a[5] = 13 Поэлементные операции: for i: =1 to N do a[i]: =a[i]*2; Вывод на экран: writeln('Массив A: '); Массив A: for i: =1 to N do 10 24 68 112 26 write(a[i]: 4);

10 Массивы Объявление: const N = 5; var a: array[1. . N] of integer; i: integer; Ввод с клавиатуры: a[1] = 5 for i: =1 to N do begin write('a[', i, ']='); a[2] = 12 ? Почему read ( a[i] ); a[3] = 34 write? a[4] = 56 end; a[5] = 13 Поэлементные операции: for i: =1 to N do a[i]: =a[i]*2; Вывод на экран: writeln('Массив A: '); Массив A: for i: =1 to N do 10 24 68 112 26 write(a[i]: 4);

11 Поиск суммы произведения и количества элементов массива Название Действие в Действия до цикла цикле после цикла сумма S: = 0 S : = S + A[i] Write (‘S=‘, s) произведе P : = 1 P : = P * A[i] Write (‘P=‘, p) ние количество K: = 0 K: = K + 1 Write (‘K=‘, k)

12 Домашнее задание 1) Выучить теорию (наизусть) 2) Составьте программу на языке программирования, используя комментарии (электронный вид и наличие задач в тетради обязательно): a) Заполнить массив В[7] случайными целыми числами из отрезка [4; 20] и вывести его в столбец на экран. b) Ввести c клавиатуры массив действительных чисел, размерности 10. Вывести элементы массива в строку. При изменении N остальная программа не должна изменяться! (размер массива задать через константу). c) Описать массив, используя новый тип (раздел описания типов). Заполнить массив 6 числами: -3 5 10 – 7 22 -3 (ввод с клавиатуры). Вывести элементы массива в строку. Определить произведение и сумму элементов массива.