Автор работы: Пользователь скрыл имя, 26 Октября 2011 в 20:44, лекция
Массив — это структура данных, которую можно рассматривать как набор переменных одинакового типа, имеющих общее имя. Массивы бывают одномерные и многомерные. Доступ к элементам массива осуществляется по индексу.
Массив в программах должен быть объявлен. Это делается следующим образом:
<имя>: array [<н_индекс>..<в_индекс>] of <тип>;
762. Удалить элемент массива целых чисел C(25), кратный 5. Если таких элементов нет, выдать сообщение «элементы для удаления не найдены». Если таких элементов несколько, удалить последний из найденных.
763. Удалить элемент массива целых чисел, равный квадрату 5-го элемента. Если таких элементов нет, выдать сообщение «элементы для удаления не найдены».
764. Удалить элемент массива целых чисел, удовлетворяющий условию: остаток от деления на 2 равен 3. Если таких элементов нет, выдать сообщение «элементы для удаления не найдены».
765. Удалить элемент массива вещественных чисел, больший заданного числа. Если таких элементов нет, выдать сообщение «элементы дня удаления не найдены». Если таких элементов несколько, удалить последний из найденных.
766. Удалить элемент массива вещественных чисел, меньший заданного числа. Если таких элементов нет, выдать сообщение «элементы для удаления не найдены», иначе удалить первый найденный элемент.
767. Удалить элемент массива целых чисел, кратный 3 и 7. Если таких элементов нет, выдать сообщение «элементы для удаления не найдены», иначе удалить первый найденный элемент.
768. Удалить элемент массива целых чисел больший куба первого элемента этого массива. Если таких элементов нет, выдать сообщение «удаление не произведено», иначе удалить последний элемент из найденных.
769. Удалить элемент массива вещественных чисел, которые больше первого, но меньше 6-го элементов массива. Если таких элементов нет, выдать сообщение «таких элементов нет», иначе удалить первый найденный элемент.
770. Удалить элемент одномерного массива вещественных чисел, который меньше среднего арифметического элементов массива. Если таких элементов несколько, удалить последний из найденных.
771. Удалить элемент одномерного массива целых чисел, который не делится на 6. Если таких элементов нет, выдать сообщение «элементы для удаления не найдены», иначе удалить первый из найденных.
772. Удалить элемент массива целых чисел, который делится на 5 и 8. Если таких элементов нет, выдать сообщение «элементы для удаления не найдены», иначе удалить последний из найденных.
773. Удалить элемент одномерного массива целых чисел M[n], удовлетворяющий условию: D[i] = 2´D[i + 1]. Если таких элементов нет, выдать сообщение «элементы для удаления не найдены», иначе удалить первый из найденных.
774. Удалить первый элемент одномерного массива целых чисел.
775. Удалить последний элемент массива вещественных чисел.
776. На 10-е место одномерного массива целых чисел вставить заданное число.
777. На 7-е место одномерного массива целых чисел вставить число, равное квадрату первого элемента.
778. На k-e место одномерного массива вещественных чисел вставить число, равное максимальному элементу массива.
779. На i-e место одномерного массива целых чисел вставить число, равное произведению первого и последнего элементов.
780. На k-e место одномерного массива вещественных чисел вставить элемент, равный среднему арифметическому элементов массива.
781. В одномерный массив целых чисел на место минимального элемента вставить максимальный элемент.
782. В одномерный массив вещественных чисел на 8-е место вставить элемент, равный сумме первых 10 элементов массива.
783. На k-e место одномерного массива целых чисел вставить элемент, равный квадрату суммы 5-го и 10-го элементов.
784. На i-e место одномерного массива вещественных чисел вставить элемент, равный квадратному корню из суммы квадратов двух введенных с клавиатуры элементов.
785. На k-e место одномерного массива целых чисел вставить элемент, равный разности двух введенных с клавиатуры элементов.
786. Задан массив. Создать два массива, в одном из которых находятся все четные по номеру элементы, в другом нечетные по номеру элементы массива.
787. Заданы два массива. Создать один массив, в котором вначале идут четные элементы, затем нечетные.
788. Из заданного массива создать три массива, в одном из которых содержатся элементы кратные 2, в другом кратные 5, в третьем оставшиеся элементы.
789. Заданы два массива. Создать один массив, в котором все элементы расположены в порядке возрастания.
790. Дан одномерный массив A[N]. Найти mах(а2, а4, ..., a2k) + min(a1, a2, ..., а2k+1).
791. Дана последовательность вещественных чисел а1, а2, ..., an. Указать те ее элементы, которые принадлежат отрезку [с; d].
792. Дана последовательность целых положительных чисел. Найти произведение только тех из них, которые больше заданного числа М. Если таких чисел нет, то выдать сообщение об этом.
793. Последовательность а1, а2, ..., an состоит из нулей и единиц. Поставить в начало этой последовательности нули, а затем единицы.
794. Даны вещественные числа а1, а2, ..., an. Среди них есть положительные и отрицательные. Заменить нулями те числа, величина которых по модулю больше максимального числа (|ai| > max {a1, a2, …, an}).
795. Даны
вещественные числа а1, а2,
..., an. Найти max (a1 + a2n, a2 + a2n–1, … a
796. В последовательности вещественных чисел а1, а2, ..., an есть только положительные и отрицательные элементы. Вычислить произведение отрицательных элементов P1 и произведение положительных элементов Р2. Сравнить модуль Р2 с модулем P1, указать, какое из произведений по модулю больше.
797. Дан массив вещественных чисел. Среди них есть равные. Найти его первый максимальный элемент и заменить его нулем.
798. Дана последовательность вещественных чисел а1 ≤ а2 ≤ ... ≤ аn. Вставить в нее вещественное число b так, чтобы последовательность осталась неубывающей.
799. Даны целые положительные числа а1, а2, ..., an. Найти среди них те, которые являются квадратами некоторого числа m.
800. Дана последовательность целых чисел а1, а2, ..., an. Образовать новую последовательность, выбросив из исходной те члены, которые равны min (а1, а2, ..., an).
801. У прилавка магазина выстроилась очередь из n покупателей. Время обслуживания i-го покупателя равно ti, (i = 1, ..., n). Определить время Сi пребывания i-го покупателя в очереди.
802. Секретный замок для сейфа состоит из 10 расположенных в ряд ячеек, в которые надо вставить игральные кубики. Но дверь открывается только в том случае, когда в любых трех соседних ячейках сумма точек на передних гранях кубиков равна 10. (Игральный кубик имеет на каждой грани от 1 до 6 точек.) Напишите программу, которая разгадывает код замка при условии, что два кубика уже вставлены в ячейки.
803. В массиве целых чисел с количеством элементов n найти наиболее часто встречающееся число. Если таких чисел несколько, определить наименьшее из них.
804. Каждый солнечный день улитка, сидящая на дереве, поднимается вверх на 2 см, а каждый пасмурный день опускается вниз на 1 см. В начале наблюдения улитка находилась на расстоянии А см от земли на 5-метровом дереве. Имеется 30-элементный массив, содержащий сведения о том, был ли соответствующий день наблюдения пасмурным или солнечным. Написать программу, определяющую местоположение улитки к концу 30-го дня наблюдения.
805. Задан целочисленный массив с количеством элементов n. Сжать массив, выбросив из него каждый второй элемент. Дополнительный массив не использовать.
806. Задан массив, содержащий несколько нулевых элементов. Сжать его, выбросив эти элементы.
807. Задан массив с количеством элементов N. Сформировать два массива: в первый включить элементы исходного массива с четными номерами, а во второй — с нечетными.
808. Дана последовательность целых чисел а1, а2, ..., an. Указать пары чисел аi, aj, таких, что ai + Eaj = m.
809. Дана последовательность целых чисел а1, а2, ..., an. Минимальный член этой последовательности заменить целой частью среднего арифметического всех членов, остальные члены оставить без изменения. Если в последовательности несколько минимальных членов, то заменить последний по порядку.
810. Даны две последовательности целых чисел а1, а2, ..., an и b1, b2, ..., bn. Преобразовать последовательность b1, b2, ..., bn по следующему правилу: если аi ≤ 0, то bi увеличить в 10 раз, в противном случае bi заменить нулем (i = 1, 2, ..., n).
811. Дана последовательность вещественных чисел а1, а2, ..., an. Требуется умножить все члены последовательности а1, а2, ..., an на квадрат ее наименьшего члена, если аk ≥ 0, и на квадрат ее наибольшего члена, если аk < 0 (1 ≤ k ≤ n).
812. Даны координаты n точек на плоскости: (Х1, Y1), ..., (Хn, Yn) (n ≤ 30). Найти номера пары точек, расстояние между которыми наибольшее (считать, что такая пара единственная).
813. Дана последовательность n различных целых чисел. Найти сумму ее членов, расположенных между максимальным и минимальным значениями (в сумму включить и оба этих числа).
814. Японская радиокомпания провела опрос N радиослушателей по вопросу: «Какое животное вы связываете с Японией и японцами?». Составить программу получения k наиболее часто встречающихся ответов и их долей (в процентах).
815. Дан массив, состоящий из n натуральных чисел. Образовать новый массив, элементами которого являются элементы исходного, оканчивающиеся на цифру k.
816. Дан массив целых чисел. Найти в этом массиве минимальный элемент m и максимальный элемент М. Получить в порядке возрастания все целые числа из интервала (m; М), которые не входят в данный массив.
817. Даны вещественное число х и массив А[n]. В массиве найти два члена, среднее арифметическое которых ближе всего к х.
818. Даны две последовательности а1, а2, ..., an и b1, b2, ..., bm (m < n). В каждой из них члены различны. Верно ли, что все члены второй последовательности входят в первую последовательность?
819. Напишите программу, входными данными которой является возраст n человек. Программа подсчитывает количество людей, возраст которых находится в интервалах по 10 лет: 0–9 лет; 10–19 лет; 20–29 лет и т. д. Напечатать результаты расчетов в удобочитаемой форме.
820. Дан массив X[N] целых чисел. Не используя других массивов, переставить его элементы в обратном порядке.
821. Коэффициенты многочлена хранятся в массиве A[N] (N — натуральное число, степень многочлена). Вычислить значение этого многочлена в точке х (то есть а[N] хn+ ... + а[1] х + а[0]). Вычислить значение его производной в той же точке.
822. В массивах А[К] и B[L] хранятся коэффициенты двух многочленов степеней K и L. Поместить в массив С[М] коэффициенты их произведения. (Числа К, L, М — натуральные, М = K + L; элемент массива с индексом i содержит коэффициент при х в степени i.)
823. Вывести информацию о наибольшем, наименьшем и наименее удаленном от среднего арифметического членах последовательности вещественных чисел.
824. Задан
массив А. Определить значение k,
при котором выражение |A[1] + А[2] + ... +A[k] – (A[