Обработка массивов. Власенко О.Ф - 23 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

Замечание: Необходимо следить, чтобы n не превысило значение
maxN.
Например, так:
…
if n+m>maxN
then writeln('В массив А все элементы массива В не поместятся')
else ... {а вот здесь выполняем добавление элементов}
Задача 16: Сформировать массив В из отрицательных элементов
массива А. Массив А не изменять.
Фрагмент программы:
…
m:=0; {m - количество элементов в массиве В -
вначале массив B пустой}
{проходим по всем элементам массива A}
for i:=1 to n do
if A[i]<0 then {если i-ый элемент массива A отрицательный}
begin
{то копируем его в массив B}
Inc(m); {в B добавляется еще один элемент -
увеличиваем m на 1}
B[m]:=A[i]; {копируем i-ый элемент массива A
в m-ый элемент массива B}
end;
…
Задача 17: Подсчитать, сколько элементов массива А совпадают
с элементами массива В.
Алгоритм программы:
1. Ввести массив А[n].
2. Ввести массив В[m] .
3. Счетчик совпадений cnt обнулить.
4. Пройти по всем элементам массива A.
5. Сравнить i-ый элемент массива А со всеми элементами
массива В.
6. Если А[i] совпадает хотя бы с одним элементом массива B,
то счетчик повторений увеличить на 1.
7. Вывести количество совпадений.
Текст программы:

Страницы