Массив Excel Access Word
Массив
Excel
Access
Word
Массив – это упорядоченная последовательность, состоящая из фиксированного количества величин одного типа
Массив – это упорядоченная последовательность, состоящая из фиксированного количества величин одного типа.
месяц | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 |
t° | -10 | -2 | 0 | 2 | 14 | 10 | 19 | 12 | 11 | 1 | -2 | 4 |
Правила оформления У каждого массива есть имя, которое дает ему программист
Правила оформления
У каждого массива есть имя, которое дает ему программист.
У массива есть размер, то есть количество составляющих его элементов.
Все элементы массива пронумерованы.
Каждый элемент массива задается своим значением и порядковым номером, т.е. индексом.
Т – имя массива
T(12) – в массиве Т 12 элементов
T[i] – элемент массива
T[12] – 12-ый элемент массива
Оформление массива на языке Паскаль
Оформление массива на языке Паскаль
VAR имя массива:ARRAY[индекс первого элемента массива..индекс последнего элемента массива] OF тип элементов массива;
Например:
Var T: array[1..12] of integer;
Ввод элементов массива с клавиатуры
Ввод элементов массива с клавиатуры
Program MVV;
Var T: array[1..12] of integer; i:integer;
Begin
FOR i:=1 TO 12 do begin
WRITE(' T[ ', i , ' ]=');
READLN( T[i]);end;
End.
Оформление массива в отдельном окне
Оформление массива в отдельном окне
Program MVV;
Uses crt;
Var T: array[1..12] of integer; i:integer;
Begin clrscr;
FOR i:=1 TO 12 do begin
WRITE(' T[ ', i , ' ]=');
READLN( T[i]);end;
End.
Задача №1: заполните массив А(10) так, чтобы элемент массива совпадал с его номером.
Задача №1 : заполните массив А(10) так, чтобы элемент массива совпадал с его номером
Задача №1: заполните массив А(10) так, чтобы элемент массива совпадал с его номером.
Program M1;
Uses crt;
Var A: array[1..10] of integer; i:integer;
Begin clrscr;
FOR i:=1 TO 10 do begin
A[ i ]:= i;
WRITE(' A[ ', i , ' ]= ', A[i]);end;
End.
Задача №2: заполните массив B(15) так, чтобы элемент массива был в 2 раза больше своего индекса.
Задача №2 : заполните массив B(15) так, чтобы элемент массива был в 2 раза больше своего индекса
Задача №2: заполните массив B(15) так, чтобы элемент массива был в 2 раза больше своего индекса.
Program M2;
Uses crt;
Var B: array[1..15] of integer; i:integer;
Begin clrscr;
FOR i:=1 TO 15 do begin
B[ i ]:= 2*i;
WRITE(' B[ ', i , ' ]= ', B[i]);end;
End.
Задача №3: заполните массив C(20) целыми числами из промежутка [-10; 10).
Ввод элементов массива с помощью счётчика случайных чисел
Ввод элементов массива с помощью счётчика случайных чисел
C[i] принадлежит промежутку (A; B]
C[i] := A + random (B – A)
Program M3; Uses crt; Var C: array[1
Program M3;
Uses crt;
Var C: array[1..20] of integer; i:integer;
Begin clrscr;
FOR i:=1 TO 20 do begin
C[ i ]:= -10 + random(20);
WRITE(' C[ ', i , ' ]= ', C[i]);end;
End.
Задача №3: заполните массив C(20) целыми числами из промежутка (-10; 10].
© ООО «Знанио»
С вами с 2009 года.
