Одномерные массивы в Паскале презентация

Массив представляет собой совокупность данных одного типа с общим для всех элементов именем.
Массив относится к структурированным типам данных (упорядоченная совокупность данных).
Номера элементов массива иначе называются индексами, а сами элементы массива — индексированными переменными.

Значение элемента массива а[3]=2,
а[7]=6.
Данные в массивах сохраняются только до конца работы программы.
Для их долговременного хранения программа должна записать данные в файл.
a[1] a[2] a[3] a[4] a[5] a[6] a[7] a[8] a[9] a[10]

Характеристики массива:
тип — общий тип всех элементов массива;
размерность (ранг) — количество индексов массива;

Способы описания массива
Например:
Const n=100;
var a: array[1..n] of real; { 100 элементов — вещественные числа }
x,y: array[1..20] of integer; { два массива x и у содержат по 20 элементов — целые числа }
var ИмяМассива: array [НижняяГраница.. ВерхняяГраница] of Тип Элементов;

Три этапа работы с массивами
1. Заполнение массива данными
2. Преобразование массива
(действия с элементами массива)
3. Вывод массива или
отдельных данных на экран

Способы заполнения массива
1. Ввод данных с клавиатуры:
for i:=1 to n do read (a[i]);
Вводимые значения набираются на клавиатуре в одну строку через пробел, после этого нажимается Enter.
2. Ввод данных с помощью датчика случайных чисел на интервале от а до b по формуле:
x[i]:=a+random(b-a+1);
Например: Заполним массив числами в диапазоне от -3 до 7.
randomize;
for i:=1 to n do a[i]:=random(11)-3;
Все действия с элементами массива выполняются в цикле

Способы заполнения массива
3. Присваивание заданных значений;
Например: заполним массив четными числами
for i:=1 to n do a[i]:=i*2;
Вывод элементов массива
Вывод элементов массива также осуществляется в цикле:
- в строку
for i:=1 to n do write (a[i],’ ‘);
Writeln;
в столбец
for i:=1 to n do writeln (a[i]);

Алгоритм решения задач с использованием массивов:
Описание массива
Заполнение массива
Выполнение условий задачи
Вывод результата

Задача: Запишите массив состоящий из 5 элементов. Элементами массива будут целые числа. Затем сложите все элементы между собой и выведите результат

Задача: Запишите массив состоящий из 10 элементов. И определите количество элементов массива которые больше числа 100

В одномерном массиве состоящий из 20 элементов посчитать сумму положительных элементов

В одномерном массиве состоящий из 10 элементов вычислить
минимальный элемент

Самостоятельно:
В одномерном массиве состоящий из 3 элементов найти разность всех чисел.
Дан одномерный массив. Элементов 10 Вывести на экран числа > 5.
В одномерном массиве состоящие из 10 элементов найти чётные числа и сложить между собой

Двумерные массивы
Массивы в Pascal

Массивы
Двумерные массивы
Двумерный массив (матрица) – это прямоугольная таблица, состоящая из нескольких строк и столбцов.
-1 3 -2 6
-4 0 5 -2
9 -8 3 2
Обозначение: a[i,j],
где i – номер строки,
j – номер столбца
var
a:array[1..n, 1..m] of integer;

Задание элементов двумерного массива
randomize;
write(‘Введите число строк’);
readln(n);
writeln(‘Введите число столбцов’);
readln(m);
for i:=1 to n do
for j:=1 to m do
a[i,j]:=random(10);
for i:=1 to n do begin
for j:=1 to m do
write(a[i,j]:4);
Writeln;
end;

program uvelich;
uses crt;
var a:array[1..10,1..10] of integer;
n,m,i,j:integer;
begin
clrscr;
randomize;
writeln('Введите число строк'); read(n); writeln('Введите число столбцов'); read(m);
for i:=1 to n do begin
a[i,2]:=a[i,2]*2;
end;
writeln;
for i:=1 to n do begin
for j:=1 to m do
write(a[i,j]:4);
writeln;
end;
readkey end.
Пример 1
В двумерном массиве увеличить элементы 2 столбца в 2 раза и напечатать полученный массив.
Цикл открываем только по строкам

uses crt;
var a:array[1..10,1..10] of integer;
n,m,i,j,s:integer;
begin
clrscr; randomize;
writeln('Введите число строк'); read(n);
writeln('Введите число столбцов'); read(m);
for i:=1 to n do
for j:=1 to m do
a[i,j]:=random(10);
for i:=1 to n do begin
for j:=1 to m do
write(a[i,j]:4);
writeln; end;
for i:=1 to n do begin
for j:=1 to m do
if a[i,j]>a[1,1] then s:=s+a[i,j];
end; writeln; write('Сумма=',s);
readkey
end.
Пример 2
Найти сумму всех элементов двумерного массива, больших первого элемента этого массива.

Главная и побочная диагонали
Матрица, у которой число строк равно числу столбцов, называется квадратной, и у нее имеются главная и побочная диагонали.
а11 а12 а13 а14
а21 а22 а23 а24
а31 а32 а33 а34
а41 а42 а43 а44
Главная диагональ
Побочная
диагональ

Квадратная матрица
а11 а12 а13 а14
а21 а22 а23 а24
а31 а32 а33 а34
а41 а42 а43 а44
Главная диагональ
Побочная
диагональ
i = n-j+1
i > n-j+1 – под диаг.
i < n-j+1 – над диаг.
i = j
i > j – под диаг.
i < j – над диаг.