Презентация на тему: Обработка одномерных массивов данных

Обработка одномерных массивов данных

Типовые задачи

Определение

Массив – это упорядоченный набор однотипных данных. Массивы бывают одномерные (линейные) и двумерные (табличные).
Примеры:
2 5 7 22 25 27 – целочисленный массив из шести элементов;
2,36 1,15 45,6 – вещественный массив из трех элементов;
true false false false true – логический массив из пяти элементов;
Иванов Петров Сидоров Васькин Васечкин Николаев – строковый массив из шести элементов.

Описание массивов в программе

var имя:array[номер первого элемента .. номер последнего элемента] of [тип элементов];

Например:
var A: array[1..100] of integer; {целочисленный массив, максимальное количество элементов – 100}
b: array[1..50] of real; {вещественный массив, максимальное количество элементов – 50}

Ввод элементов массива

Для ввода элементов массива в компьютерную память используются циклические алгоритмические конструкции.
Например:
For i:=1 to 10 do readln(A[i]);{цикл с параметром для ввода 10-и элементов массива}

Вывод элементов массива

Для вывода элементов массива также используются циклические алгоритмические конструкции.
Например:
For i:=1 to 20 do writeln(B[i]);{цикл с параметром для вывода 20-и элементов массива, элементы выводятся в столбик}
For i:=1 to 20 do write(B[i], ‘ ‘);{цикл с параметром для вывода 20-и элементов массива, элементы выводятся в строку через пробел}

Решаемтиповые задачи

Нахождение суммы элементов массива, состоящего из n чисел

s:=0;
for i:=1 to n do
s:=s+a[i];
writeln (‘сумма =’, s);

Найдите сумму только положительных элементов массива, состоящего из n чисел.

s:=0;
for i:=1 to n do
if a[i]>0 then s:=s+a[i];
writeln (‘сумма = ’, s);

Решение:

Нахождение произведения элементов массива, состоящего из n чисел

p:=1;
for i:=1 to n do
p:=p*a[i];
writeln (‘произведение =’, p);

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

p:=1;
for i:=1 to 10 do
if a[i]<0 then p:=p*a[i];
writeln (‘произведение = ’, p);

Решение:

Нахождение среднего арифметического элементов массива, состоящего из n чисел

s:=0;
for i:=1 to n do
s:=s+a[i];
sr:=s/n;
writeln (‘среднее арифметическое =’, sr);

Вычислить количество пятёрок, которые получены Банановым, если известно, что всего он получил 10 отметок.

k:=0;
for i:=1 to 10 do
if a[i]=5 then k:=k+1;
writeln (‘кол-во «5»-ок =’, k);

Найти среднее арифметическое положительных элементов массива, состоящего из n чисел

Решение:

s:=0;
k:=0
for i:=1 to n do
if a[i]>0 then
begin
s:=s+a[i];
k:=k+1
end;
sr:=s/k;
writeln (‘среднее =’, sr);

Найти наибольший элемент в заданном массиве из n чисел

max:=a[1];
for i:=2 to n do
if a[i]>max then max:=a[i];
writeln(‘max=‘, max);

Указать индексы элементов, совпадающих с наибольшим.

for i:=1 to n do
if a[i]=max then writeln (‘индекс максимального элемента =‘, i);

Замена элементов массива

for i:=1 to n do
if a[i] mod 2=0 then a[i]:=0 else a[i]:=1;
for i:=1 to n do write (a[i],’ ‘); {алгоритм замены чётных элементов массива числом 0, нечётных – числом 1}