Презентация на тему по информатике на тему Массив в Паскале (9 класс)

из хранимых значений имеет определённый индекс для обращения к

нему.  Он используется для хранения числовых значений в определённом количестве.

Шкаф

3

1

2

4

Шкаф – это массив.

Ящики – это индексы.

Содержание ящиков – это элементы массив.

значение порядкового типа, определенного, как тип индекса данного массива.
Очень часто

это целочисленный тип
( integer , word или byte ), но может быть и логический и символьный.

integer;

1. Название на латинском языке массива;
2. Символ «двоеточие»;
3. Array

– ключевое слово;
4. В квадратных скобках указываем два числа – начальное и конечное значение индексов, которыми будет нумероваться элементы массива. Между этими значениями должно быть написано «. .» (две точки);
5. Of – ключевое слово;
6. Имя типа данных, который будут иметь все элементы массива.

В результате мы получаем массив А, содержащий 10 элементов, типа integer , пронумерованных числами от 1 до 10.

командой, для этого необходимо использовать цикл с параметром.

вводу массива>;
<ввод количества элементов массива>;
For i:= 1 to <количество элементов> do
Begin
<приглашение к вводу i-ого элемента>;
<ввод i-ого элемента>;
End;

n элементов, заданных датчиком случайных чисел на интервале [-23,

34].

Program posled;
Var a: array[1..100] of integer;
i, n: integer;
Begin
Write (‘Сколько элементов? ’); Readln (n);
For i=1 to n do
begin
a[i]:= Random(58)-23;
writeln (a[i],’ ‘);
end;
End.

Ответ

n элементов. Элементы вводятся с клавиатуры.

Ответ
Program proisveden;
Var a: array[1..100]

of integer;
i, n, p: integer;
Begin
Write (‘Сколько элементов? ’); Readln (n);
p:=1;
For i:=1 to n do
begin
write (‘введите число’); readln (a[i]);
p:=p*a[i];
end;
writeln(‘произведение элементов равно: ‘,p);
End.

массива. Размер произвольный. Элементы вводятся с клавиатуры.
Возможный вариант

программы

Program summa;
Var a: array[1..100] of real;
i, n: integer; s: real;
Begin
Write (‘n=’);
Readln (n); s:=0;
For i:=1 to n do
Begin
write (‘введите число’);
readln (a[i]);
s:=s+a[i];
end;
writeln(‘сумма элементов равна ‘,s); End