Pascal: Примеры задач с решением (одномерные массивы)

Задача 1.

Дан массив чисел. Найти, сколько в нем пар одинаковых соседних элементов.

Переменные:

mas – массив чисел;
n – размер массива;
i – переменная цикла;
k – количество одинаковых пар соседних элементов.

Алгоритм решения задачи:

  1. вводим длину массива n, значение элементов массива и устанавливаем начальное значение k;
  2. последовательно просматриваем элементы и, если очередной mas[i] равен следующему mas[i+1], то увеличиваем значение k на единицу;
  3. выводим результат.

Задача 2.

Программа. Дано 100 целых чисел. Распечатать их в обратном порядке по 6 чисел в строке.

Задача 3.

Сортировка слиянием

Элементы каждого из массивов x и y упорядочены по неубыванию. Объединить элементы этих двух массивов в один массив z так, чтобы они снова оказались упорядоченными по неубыванию.

Задача 4.

Описать процедуру move(s,k), которая преобразует шкалу s, циклически сдвигая ее элементы на k позиций влево, где k – параметр типа shift.