Урок, Презентация "Одномерные массивы"
- Рубрика: Презентации / Другие презентации
- Просмотров: 0
Презентация для классов "Урок, Презентация "Одномерные массивы"" онлайн бесплатно на сайте электронных школьных презентаций uchebniki.org.ua
Выполнила: учитель Минина О.В.
Муниципальное бюджетное общеобразовательное учреждение
города Керчи Республики Крым «Школа №26 имени Героя Советского Союза Д.Т. Доева»
Одномерные массивы
Массив – это структура данных, представляющая собой совокупность элементов одного типа.
Элемент массива – отдельная переменная, входящая в массив. Размерность массива – количество элементов, которое содержит массив
Индекс элемента массива – номер элемента в массиве. Массив должен быть объявлен в разделе объявления переменных.
Доступ к элементу массива осуществляется путем указания индекса элемента, в качестве которого можно использовать выражение целого типа. Для ввода/вывода и обработки массивов применяют инструкции циклов.
<Имя массива>:ARRAY [< индекс >] OF < тип>;
M1:array[1..5] of real – описание одномерного массива вещественных чисел, содержащий 5 элементов;
Заполнить элементы одномерного массива значениями мы можем:
Вводя значения с клавиатуры
Случайным образом
По формуле
Заполнение с клавиатуры.
FOR i:=1 to 10 do
Begin
writeln (‘Введите значения элемента’);
readln (a[i]);
end;
2.Заполнение случайным образом. Для этого мы должны подключить датчик случайных чисел.
FOR i:=1 to 10 do
A[i]:=random(n);
{n должно быть заранее задано}
3. Заполнение по формуле.
FOR i:=1 to 10 do
F[i]:=sin (i)-cos (i);
Базовые алгоритмы вычисления. Одномерные массивы.
Печать элементов одной строки.
FOR i:=1 to n do
Writeln(a[i], ‘’);
2.Сумма элементов.
S:=0;
FOR i:=1 to n do
S:=S+a[i];
3. Поиск максимального (минимального) элемента.
max:=a[i];
FOR i:=2 to n do
If a[i]>max then max:=a[i];
const N = 15;
var arr: array[1..N] of integer;
i: byte; sum: integer;
begin
randomize;
for i:=1 to N do begin
arr[i] := random(10) - 5;
write(arr[i]:4); end; writeln; sum := 0;
for i:=1 to N do
if arr[i] > 0 then sum := sum + arr[i]; writeln(sum:5);
end.