687. Заполнить массив из восьми элементов следующими значениями: первый элемент массива равен 37, второй — 0, третий — 50, четвертый — 46, пятый — 34, шестой — 46, седьмой — 0, восьмой — 13.
688. Заполнить массив из десяти элементов значениями, вводимыми с клавиатуры в ходе выполнения программы.
689. Заполнить массив из пятнадцати элементов случайным образом:
а) вещественными значениями, лежащими в диапазоне от 0 до 1;
б) вещественными значениями х (22 ≤ х < 23);
в) вещественными значениями х (0 ≤ х < 10);
г) вещественными значениями х (–50 ≤ х < 50);
д) целыми значениями, лежащими в диапазоне от 0 до 10 включительно.
690. Массив предназначен для хранения значений роста двенадцати человек. С помощью датчика случайных чисел заполнить массив целыми значениями, лежащими в диапазоне от 163 до 190 включительно.
691. Заполнить массив из двенадцати элементов следующим образом: 1, 2, ..., 12.
692. Заполнить массив из двадцати элементов следующим образом: 20, 19, ..., 1.
693. Заполнить массив из восьми элементов таким образом, чтобы значения элементов при просмотре массива слева направо образовывали:
а) убывающую последовательность;
б) возрастающую последовательность.
694. Заполнить массив:
а) десятью первыми членами арифметической прогрессии (первый член прогрессии — а, ее разность — р);
б) двадцатью первыми членами геометрической прогрессии (первый член прогрессии — а, ее знаменатель — z);
в) двенадцатью первыми членами последовательности Фибоначчи (последовательности, в которой первые два члена равны 1, а каждый следующий равен сумме двух предыдущих).
695. Используя датчик случайных чисел, заполнить массив из двадцати элементов неповторяющимися числами.
696. Дано натуральное число n ≤ 999999. Заполнить массив его цифрами, расположенными в обратном порядке (первый элемент равен последней цифре, второй — предпоследней и т. д.). Элементы массива, являющиеся цифрами числа n, вывести на экран.
697. Заполнить массив:
а) двадцатью первыми натуральными числами, делящимися нацело на 13 или на 17 и большими 300;
б) тридцатью первыми простыми числами.
698. Составить программу вывода на экран любого элемента массива.
699. Вывести элементы массива на экран в обратном порядке.
700. Дан массив. Составить программу:
а) извлечения квадратного корня из любого элемента массива;
б) расчета среднего арифметического двух любых элементов массива.
701. Дан массив целых чисел. Выяснить:
а) является ли р-й элемент массива положительным числом;
б) является ли k-й элемент массива четным числом;
в) какой элемент массива больше, k-й или р-й.
702. Дан массив. Все его элементы:
а) увеличить в 2 раза;
б) уменьшить на число а;
в) разделить на первый элемент.
г) уменьшить на 20;
д) умножить на последний элемент;
е) увеличить на число b.
703. Определить:
а) сумму всех элементов массива;
б) произведение всех элементов массива;
в) сумму квадратов всех элементов массива;
г) сумму шести первых элементов массива;
д) сумму элементов массива с k1-го по k2-й (значения k1 и k2 вводятся с клавиатуры; k2 > k1);
е) среднее арифметическое всех элементов массива;
ж) среднее арифметическое элементов массива с p1-го по p2-й (значения p1 и p2 вводятся с клавиатуры; p2 > p1).
704. Дан массив A. Определить сумму знакочередующейся последовательности A[1] – А[2] + А[3] – A[4] + ... . Условную инструкцию и операцию возведения в степень не использовать.
705. В массиве хранятся сведения о количестве осадков, выпавших за каждый день января. Определить:
а) общее количество осадков за месяц;
б) общее количество осадков, выпавших за каждую декаду месяца;
в) среднедневное количество осадков в этом месяце;
г) сколько осадков выпадало в среднем за один день в первую, вторую и третью декады этого месяца.
д) в какой период выпало больше осадков: в первую половину июня или во вторую;
е) в какую декаду месяца выпало больше всего осадков.
706. В массиве хранятся сведения о стоимости 12 различных предметов. Определить общую стоимость всех предметов.
707. В массиве хранится информация о сопротивлении каждого из 20 элементов электрической цепи. Определить общее сопротивление цепи, если:
а) все элементы соединены последовательно;
б) все элементы соединены параллельно.
708. Дан массив целых чисел. Выяснить:
а) верно ли, что сумма элементов массива есть четное число;
б) верно ли, что сумма квадратов элементов массива есть пятизначное число;
в) верно ли, что сумма элементов массива неотрицательна.
709. В массиве хранится информация о численности книг в каждом из 35 разделов библиотеки. Выяснить, верно ли, что общее число книг в библиотеке есть шестизначное число.
710. В массиве хранится информация о баллах, полученных спортсменом-десятиборцем в каждом из десяти видов спорта. Для выхода в следующий этап соревнований общая сумма баллов должна превысить некоторое известное значение. Определить, вышел ли данный спортсмен в следующий этап соревнований.
711. Оценки, полученные спортсменом в соревнованиях по фигурному катанию (в баллах), хранятся в массиве из 18 элементов. В первых шести элементах записаны оценки по обязательной программе, с седьмого по двенадцатый — по короткой программе, в остальных — по произвольной программе. Выяснить, по какому виду программы спортсмен показал лучший результат.
712. В массив A[N] занесены натуральные числа. Найти сумму тех элементов, которые кратны данному значению К.
713. В целочисленной последовательности есть нулевые элементы. Создать массив из номеров этих элементов.
714. Дана последовательность целых чисел а1, а2, ..., an. Выяснить, какое число встречается раньше — положительное или отрицательное.
715. Дана последовательность вещественных чисел а1, а2, ..., an. Выяснить, является ли она возрастающей.
716. Дана последовательность натуральных чисел а1, а2, ..., an. Создать массив из четных чисел этой последовательности. Если таких чисел нет, то вывести сообщение об этом факте.
717. Дана последовательность чисел а1, а2, ..., an. Указать наименьшую длину числовой оси, содержащую все эти числа.
718. Дана последовательность вещественных чисел а1, а2, ..., an. Заменить все ее члены, большие данного числа Z, этим числом. Подсчитать количество замен.
719. Последовательность вещественных чисел оканчивается нулем. Найти количество членов этой последовательности.
720. Дан массив вещественных чисел, размер которого N. Подсчитать, сколько в нем отрицательных, положительных и нулевых элементов.
721. Даны вещественные числа а1, а2, ..., an. Поменять местами наибольший и наименьший элементы.
722. Даны целые числа а1, а2, ..., an. Вывести на печать только те числа, для которых выполняется условие ai ≥ i.
723. Даны натуральные числа а1, а2, ..., an. Указать те из них, у которых остаток от деления на М равен L(0 ≤ L ≤ M – 1).
724. В заданном одномерном массиве поменять местами соседние элементы, стоящие на четных местах, с элементами, стоящими на нечетных местах.
725. При поступлении в вуз абитуриенты, получившие двойку на первом экзамене, ко второму не допускаются. В массиве А[n] записаны оценки экзаменующихся, полученные на первом экзамене. Подсчитать, сколько человек не допущено ко второму экзамену.
726. Дана последовательность чисел, среди которых имеется один нуль. Вывести на экран все числа до нуля включительно.
727. В одномерном массиве размещены: в нечетных элементах — значения аргумента, в четных — соответствующие им значения функции. Напечатать элементы этого массива в виде двух параллельных столбцов (аргумент и значения функции).
728. Пригодность детали оценивается по размеру В, который должен лежать в интервале (А – δ, А + δ). Определить, имеются ли в партии из N деталей бракованные. Если да, то подсчитать их количество, в противном случае выдать отрицательный ответ.
729. У вас есть доллары. Вы хотите обменять их на рубли. Есть информация о стоимости купли-продажи в банках города. В городе N банков. Составьте программу, определяющую, какой банк выбрать, чтобы выгодно обменять доллары на рубли.
730. Дан целочисленный массив с количеством элементов n. Напечатать те его элементы, индексы которых являются степенями двойки (1, 2, 4, 8, 16, ...).
731. Задана последовательность из N вещественных чисел. Определить, сколько среди них чисел, меньших К, равных Ки больших К.
732. Задана последовательность N вещественных чисел. Вычислить , где М— среднее арифметическое данной последовательности.
733. Определить, входит ли в массив, заданный на языке Паскаль, последовательность символов 123 и, если да, то сколько раз и с каких позиций (N > 3):
var a: array [1..n] of '0'..'9';
734. Задан массив вещественных чисел. Определить, сколько раз меняется знак в данной последовательности чисел, и запомнить номера позиций, в которых происходит смена знака.
735. Задана последовательность N вещественных чисел. Вычислить сумму чисел, порядковые номера которых являются:
а) простыми числами;
б) числами Фибоначчи.
736. Задана последовательность N вещественных чисел. Вычислить значение выражения .
737. Задана последовательность N целых чисел. Вычислить сумму элементов массива, у которых порядковый номер совпадает со значением.
738. Заполнить массив из N элементов с начальным значением заданным А[0] ≠ 0, по принципу A[i] = A[i div 2] + A[i–1].
739. Определить количество элементов последовательности натуральных чисел в промежутке от L до N, кратных числу М.
740. Определить, сколько процентов от всего количества элементов последовательности целых чисел составляют нечетные элементы.
741. Сформировать массив простых чисел, не превышающих заданное натуральное число N.
743. Дан вектор {zi}, i = 1, ..., 50. Вычислить длину этого вектора: .
744. Для вектора {хi}, i = 1, ..., 20, подсчитать количество компонентов, значения которых лежат в интервале [0; 1].
745. Даны два вектора {хi}, {уi}, i = 1, ..., 10, упорядоченные по возрастанию. Объединить их в один вектор {zi}, i = 1, ..., 20, так чтобы сохранилась упорядоченность.
746. Дан массив, состоящий из 100 целых чисел. Вывести все числа, которые встречаются в этом массиве:
а) несколько раз;
б) только по одному разу.
747. Найти и запомнить в массиве все максимумы и минимумы функции при изменении аргумента от 0 до 5 с шагом 0,1.
748. Дано целое х и массив целых чисел А[1], ..., А[n], которые отсортированы в порядке неубывания и уже находятся в памяти. Найти такое значение i, что A[i] = x, или возвратить i = 0, если элемента х в массиве нет.
749. Найти сумму четных элементов массива целых чисел.
750. Найти произведение элементов массива целых чисел, которые кратны 9.
751. Найти сумму элементов массива вещественных чисел, имеющих нечетные номера.
752. Найти сумму наибольшего и наименьшего элементов массива вещественных чисел массива Z(n);
753. Найти произведение всех элементов массива целых чисел, меньших 0.
754. Найти сумму всех элементов массива целых чисел, удовлетворяющих условию: остаток от деления на 2 равен 3.
755. Найти сумму всех элементов массива вещественных чисел, больших заданного числа.
756. Найти произведение элементов массива вещественных чисел, меньших заданного числа.
757. Найти произведение элементов массива, кратных 3 и 9.
758. Найти сумму элементов массива, больших квадрата первого элемента этого массива. Если таких элементов нет, выдать сообщение о неудачности поиска.
759. Найти произведение элементов массива вещественных чисел, которые больше первого, но меньше 4-го элемента массива (если таких элементов нет, выдать сообщение об отсутствии таких элементов).
760. Удалить 10-й элемент одномерного массива целых чисел B(n).
761. Удалить k-й элемент массива целых чисел A(50).
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] = 2D[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, … an + an+1).
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[k + 1] + ... + A[N])| минимально (то есть минимален модуль разности сумм элементов в правой и левой частях, на которые массив делится этим k).
825. Дан упорядоченный по убыванию массив чисел. Вводим число N. Вставить это число в упорядоченный массив так, чтобы массив-результат тоже был упорядочен по убыванию.
826. Даны два упорядоченных массива целых чисел M1 и М2. Объединить их в один упорядоченный массив. Рассмотреть случаи, когда массивы M1 и М2 упорядочены одинаково и когда по-разному.
827. Дан массив чисел. Найти сумму трех минимальных элементов.
828. Дан массив целых чисел. Записать его элементы в обратном порядке.
829. Дан массив целых чисел M1. Вводим массив M2, размер которого значительно меньше, чем у M1. Определить, сколько раз массив M2 встречается в M1.
830. Выставленные в журнале оценки результатов контрольной работы по информатике образуют массив Z(n). Написать алгоритм и программу определения числа отличных оценок, числа плохих оценок, среднего балла за контрольную работу. Массив оценок сформировать с помощью генератора случайных чисел.
831. При диспансеризации школьников определялись их рост и вес. В результате были получены массивы значений роста R(n) и веса W(n). Написать алгоритм и программу определения школьников с максимальным и минимальным ростом и их номеров в таблице, а также номер школьника с наибольшим дефицитом веса (наименьшим отношением веса к росту). Кроме того, следует упорядочить по возрастанию массив весов. Вывести результаты работы программы. Массивы значений роста и веса для отладки программы сформировать с помощью генератора случайных чисел.
832. Имеется таблица зарплаты Z(n), премий P(n) и удержаний U(n). Написать алгоритм и программу определения элементов таблицы «к выдаче на руки» R(n), суммарной величины зарплаты, максимальной премии и ее номера в таблице. Упорядочить по убыванию массив удержаний. Все исходные массивы для отладки программы сформировать с помощью генератора случайных чисел.
833. На соревнованиях по прыжкам в высоту и в длину получены два массива результатов H(n) и D(n). Определить три лучших и три худших результата в каждом виде соревнований. Для проверки работоспособности программы тесты сформировать с помощью генератора случайных чисел.
834. На метеопосту за период наблюдения в n дней была получена таблица величины атмосферного давления. Записать программу, которая:
а) определяет максимальный и минимальный по величине элементы массива и номера соответствующих им дней в массиве;
б) определяет среднее значение давления за время наблюдения;
в) подсчитывает количество дней, в которые давление превышало заданную величину d;
г) сортирует массив по возрастанию;
д) выводит исходный, упорядоченный массив и результаты вычислений.
Для отладки программы исходный массив сформировать с помощью генератора случайных чисел. Величину давления брать равной 760 ± а, где а = [0, ..., 20].
835. В автопарке при обработке путевых листов получены два массива: массив S(n) пробега автомашины при n выездах и массив B(n) соответствующего расхода бензина. Написать программу, которая:
а) вычисляет суммарный пробег и суммарный расход бензина за все выезды;
б) вычисляет средний пробег и средний расход бензина за один выезд;
в) определяет максимальный и минимальный пробег за один выезд и их номера в массиве;
г) вычисляет важный показатель экономичности автомобиля — средний расход бензина в литрах на 100 километров;
д) упорядочивает массив пробега по убыванию;
е) выдает исходные массивы, упорядоченный массив и результаты решения.
При формировании исходных массивов использовать генератор случайных чисел и считать, что S[i] = 10[0,5, ..., 2] B[i].
836. Арендатор взял для откорма n бычков. После их взвешивания была получена таблица P1(n). Через три месяца откорма после очередного взвешивания была получена таблица P2(n). Записать программу, которая:
а) формирует таблицу P3(n) привесов и определяет максимальный и минимальный привесы и их номера в таблице;
б) вычисляет средний привес;
в) подсчитывает количество бычков, привес которых ниже нормы d;
г) упорядочивает таблицу привесов по убыванию;
д) отображает исходные и полученные таблицы, а также результаты вычислений.
Для отладки программы исходные массивы сформировать с помощью генератора случайных чисел.
837. Руководство фирмы ведет по месяцам учет расходов и поступлений средств. За n месяцев получены два массива: R(n) — расходов и P(n) — поступлений. Сформировать из массивов R(n) и P(n) массив прибыли Z(n). Определить общую прибыль (как за весь период, так и по месяцам она может быть отрицательная), месяц с максимальной и месяц с минимальной прибылью, количество месяцев с положительной прибылью.
838. Для массива целых чисел определить разность между суммой элементов с нечетными номерами и суммой элементов с четными номерами.
839. Заполнить массив значениями скорости в каждую секунду из первых 50 секунд движения тела, движущегося с начальной скоростью V0 и ускорением а. Напомним формулу: Vt = V0 + at. Начальную скорость и ускорение ввести с клавиатуры.
840. Перемешать колоду из n игральных карт (n = 36 или n = 52). Заполнить массив K(n) числами натурального ряда K(i) = i. При перемешивании использовать обмен переменных со сгенерированными случайными номерами.
841. Написать алгоритм смены мест в заданном массиве 1-го элемента с последним, 2-го с предпоследним и так далее.
842. Задан массив вещественных чисел. Создать два массива, в первый из которых записать пять первых по порядку положительных чисел исходного массива, во второй — номера этих элементов.
843. Проверить, имеется ли в заданном массиве хотя бы один элемент, равный или кратный своему номеру в массиве. При такой постановке задачи естественно предусмотреть прекращение поиска в случае, когда первый такой элемент будет найден.
844. С помощью датчика случайных чисел создать массив целых чисел, элементы которого отличаются от своих соседей по массиву на малую величину, например, не более, чем на 10 %. Такие массивы находят применение, например, при создании проверочных тестов в задачах об изменении атмосферного давления или температуры воздуха по дням месяца и т. п.
845. Проверить, не являются ли элементы заданного массива элементами арифметической или геометрической прогрессии.
846. На плоскости заданы n точек своими координатами х и у. Написать программу определения расстояния между наиболее удаленными друг от друга точками и расстояния между наименее удаленными точками.
847. Проверить, не является ли последовательность элементов массива а[0; n] перестановкой натуральных чисел 0, 1, 2, 3, ..., n.
848. Задан массив вещественных чисел и натуральные числа R и H < R. Создать и заполнить массив номеров таких чисел исходного массива, которые отличаются от R не более чем на Н.
849. Написать программу определения в одномерном массиве вещественных чисел наибольшего количества последовательно расположенных положительных чисел*.
850. Написать программу определения в одномерном массиве целых чисел наибольшее количество последовательно расположенных чисел, образующих «пилу». Например, пилу образуют числа 3, 7, 5, 9, 2, 4, 1, 6.
851. Задан упорядоченный по возрастанию массив целых чисел. Написать программу, позволяющую вставить в этот массив вводимое с клавиатуры число без нарушения упорядоченности. Предполагается, что размер заданного массива не увеличивается. Поэтому требуется определить, вставлять ли в массив элемент, по величине больший (меньший) всех элементов массива. Это можно сделать, удалив наименьший (наибольший) по величине элемент. Затем нужно определиться с направлением сдвига элементов при освобождении места. Если исключить вариант вставки таких элементов и сдвигать в сторону большие по величине элементов, то останется только определить место вставки, сдвинуть элементы, освобождая место для вставки, и вставить вводимое число.
852. Образуем числовую последовательность. Начальный элемент — произвольное натуральное число, кратное трем; за любым элементом последовательности следует число, равное сумме кубов всех цифр данного элемента. Доказать, что такая последовательность, начиная с некоторого места, становится постоянной и равной некоторому числу. Чему равно это число?
853. Первый член последовательности — четырехзначное целое число, цифры которого не все одинаковые. Каждый последующий элемент образуется следующим образом. Цифры предыдущего элемента располагаем в убывающем порядке (первое число) и в возрастающем порядке (второе число). Из первого числа вычитаем второе и получаем следующий элемент последовательности. Показать, что такая последовательность, начиная с некоторого элемента, становится постоянной и равной некоторому числу. Чему равно это число?
854. Разработать алгоритм и написать программу поиска заданного элемента в упорядоченном массиве. Вариантов решения задачи несколько, и они могут существенно различаться своим быстродействием. При гипотезе сравнительно равномерного возрастания величины элементов поиск можно начинать с начала или с конца массива. При значительной величине массива и при частом использовании программы можно организовать двоичный поиск, который заключается в последовательном делении сначала всего массива, затем получающихся частей пополам. Выбор следующей половины зависит от результатов сравнения величин заданного элемента и элемента, расположенного на границе половинок. Деление и сравнение продолжается до обнаружения первого элемента, который может удовлетворять или не удовлетворять условию поиска.
855. В одномерном массиве все отрицательные элементы переместить в начало массива, а остальные — в конец с сохранением порядка следования. Дополнительный массив использовать не разрешается.
856. В одномерном массиве с четным количеством элементов (2N) находятся координаты N точек плоскости. Они располагаются в следующем порядке: x1, y1, x2, y2, x3, y3 и т. д. Определить
а) минимальный радиус окружности с центром в начале координат, которая содержит все точки;
б) кольцо с центром в начале координат, которое содержит все точки;
в) номера точек, которые могут являться вершинами равнобедренного треугольника;
г) номера наиболее и наименее удаленных друг от друга точек;
д) три точки, являющиеся координатами треугольника, который в свою очередь содержит остальные координаты на минимальном расстоянии от своих вершин.
857. Задан целочисленный массив размерности N. Есть ли среди элементов массива простые числа? Если да, то вывести номера этих элементов.
858. Дана последовательность целых чисел. Найти количество различных чисел в этой последовательности.
859. Дан массив из n четырехзначных натуральных чисел. Вывести на экран только те, у которых сумма первых двух цифр равна сумме двух последних.
860. Даны две последовательности целых чисел а1, а2, ..., an и b1, b2, ..., bn. Все члены последовательностей — различные числа. Найти, сколько членов первой последовательности совпадает с членами второй последовательности.
861. Дан целочисленный массив А[n], среди элементов есть одинаковые. Создать массив из различных элементов А[n].
862. На плоскости n точек заданы своими координатами, и также дана окружность радиуса R с центром в начале координат. Указать множество всех треугольников с вершинами в заданных точках, пересекающихся с окружностью; множество всех треугольников, содержащихся внутри окружности.
863. Некоторое число содержится в каждом из трех целочисленных неубывающих массивов x[1] ≤ ... ≤ х[р], у[1] ≤ ... ≤ y[q], z[1] ≤ … ≤ z[r]. Найти одно из таких чисел. Число действий должно быть порядка р + q + r.
864. Выяснить, есть ли одинаковые числа в каждом из трех целочисленных неубывающих массивов x[1] ≤ ... ≤ х[р], у[1] ≤ ... ≤ y[q], z[1] ≤ … ≤ z[r]. Найти одно из таких чисел или сообщить о его отсутствии.
865. Дана целочисленная таблица А[n]. Найти наименьшее число элементов, которые нужно выкинуть из данной последовательности, чтобы осталась возрастающая подпоследовательность.
866. Разделить массив на две части, поместив в первую элементы, большие среднего арифметического их суммы, а во вторую — меньшие (части не сортировать).
867. Известно, что в массиве имеются элементы, равные 5. Определить:
а) номер первого из них;
б) номер последнего из них.
В обеих задачах условную инструкцию не использовать.
868. Известно, что в массиве имеются элементы, большие 65 530. Определить:
а) номер первого;
б) номер последнего.
В обеих задачах условную инструкцию не использовать.
869. Известно, что в массиве имеются нулевые элементы. Напечатать:
а) все элементы, кроме первого;
б) все элементы, кроме последнего.
В обеих задачах условную инструкцию не использовать.
870. Даны массив, упорядоченный по возрастанию, и число а, о котором известно следующее: оно не равно ни одному из элементов массива, больше первого и меньше последнего элемента.
а) Вывести все элементы массива, меньшие а (условную инструкцию не использовать).
б) Найти два элемента массива (их порядковые номера и значение), в интервале между которыми находится значение а (условную инструкцию не использовать).
в) Найти элемент массива (его порядковый номер и значение), ближайший к а.
871. Известны данные о росте 15 юношей класса, упорядоченные по убыванию. Нет ни одной пары учеников с одинаковым ростом. В начале учебного года в класс поступил новый ученик. Какое место в перечне значений роста займет рост этого ученика (известно, что его рост не совпадает с ростом ни одного из учеников класса, превышает рост самого низкого ученика и меньше роста самого высокого)? Условную инструкцию не использовать.
872. Известно количество очков, набранных каждой из 20 команд-участниц первенства по футболу. Перечень очков дан в порядке убывания (ни одна пара команд не набрала одинакового количества очков). Определить, какое место заняла команда, набравшая n очков (естественно, что значение n имеется в перечне). Условную инструкцию не использовать.
873. В начале массива записано несколько равных между собой элементов. Определить количество таких элементов и вывести все элементы, следующие за последним из них. Условную инструкцию не использовать. Предусмотреть возможность, что все элементы массива равны между собой.
874. Дан массив целых чисел.
а) Напечатать все элементы, предшествующие первому элементу с заданным значением n. Если элементов, равных n, в массиве нет, то должны быть напечатаны все элементы.
б) Напечатать все элементы, следующие за последним элементом, оканчивающимся цифрой 7. Если элементов, оканчивающихся цифрой 7, в массиве нет, то ни один элемент не должен быть напечатан.
875. Найти количество различных элементов в массиве.
876. Дано натуральное число n. Определить количество различных цифр в нем. Например, в числе 1234 количество различных цифр равно 4, в числе 22 424 — 2, в числе 333 — 1.
877. В массиве имеются только два одинаковых элемента. Найти их.
878. Для арифметических операций с большими числами, которые не могут быть представлены в памяти компьютера, используется следующий прием. Каждая цифра таких чисел записывается в отдельный элемент массива, и необходимые операции проводятся с элементами массива цифр. Составить программу:
а) выполняющую сложение 20-значных чисел;
б) выполняющую вычитание 30-значных чисел.
879. Получить последовательность цифр числа 2100.
880. Получить последовательность цифр числа 100! (n! = 1 · 2 · ... · n).
881. Удалить из массива*:
а) третий элемент;
б) k-й элемент.
882. В массиве записана информация о стоимости каждого из 20 видов товара, продаваемых фирмой. С 1 января очередного года фирма прекращает продавать товар, стоимость которого записана в n-м элементе массива. Получить массив со стоимостью всех оставшихся видов товара.
883. Дан массив, в котором все элементы различны. Удалить из него:
а) максимальный элемент;
б) минимальный элемент.
884. В массиве записана информация о росте каждого из 25 учеников класса (в порядке убывания роста). Один из учеников из класса выбыл. Получить новый массив с упорядоченными в том же порядке данными о росте оставшихся учеников.
885. Удалить из массива:
а) первый отрицательный элемент (если отрицательные элементы в массиве есть);
б) удалить последний четный элемент (если четные элементы в массиве есть).
886. Удалить из массива, в котором все элементы различны, максимальный и минимальный элементы.
887. В массиве записана информация о росте каждого из 25 учеников класса (в порядке убывания роста). Из класса выбыли два ученика. Получить новый массив с упорядоченными в том же порядке данными о росте оставшихся учеников.
888. Удалить из массива:
а) все отрицательные элементы;
б) все элементы, большие данного числа n;
в) все элементы, начиная с n1-го по n2-й (n1 ≤ n2).
889. Дан массив целых чисел. Удалить из него:
а) все четные элементы, стоящие на нечетных местах;
б) все элементы, кратные 3 или 5.
890. Удалить из массива все повторяющиеся элементы, оставив их первые вхождения, то есть в массиве должны остаться только разные элементы.
891. Вставить в массив два числа следующим образом: первое со значением n перед всеми элементами, большими n, и второе со значением m — после всех элементов, меньших m. Каков должен быть максимальный размер исходного массива?
892. Данные о росте 25 учеников класса, упорядоченные по убыванию, записаны в массиве. В начале учебного года в класс поступили два новых ученика. Получить аналогичный массив, учитывающий рост новых учеников. Каков должен быть максимальный размер исходного массива?
893. Вставить число а в массив целых чисел после всех элементов, в которых есть цифра 5. Каков должен быть максимальный размер исходного массива?
894. Вставить число n между всеми соседними элементами, имеющими одинаковый знак. Каков должен быть максимальный размер исходного массива?
895. Заданы два одномерных массива с различным количеством элементов и натуральное число k. Объединить их в один массив, включив второй массив между k-м и (k + 1)-м элементами первого, не используя при этом дополнительный массив.
896. Даны две последовательности а1 ≤ a2 ≤ ... ≤ аn и b1 ≤ b2 ≤ ... ≤ bm. Образовать из них новую последовательность чисел так, чтобы она тоже была неубывающей. Дополнительный массив не использовать.
897. Дана последовательность чисел а1 ≤ a2 ≤ ... ≤ аn. Требуется переставить числа в порядке возрастания. Делается это следующим образом. Пусть а1, а2, ..., ai — упорядоченная последовательность, то есть а1 ≤ a2 ≤ ... ≤ аi. Берется следующее число ai+1 и вставляется в последовательность так, чтобы новая последовательность была тоже возрастающей. Процесс производится до тех пор, пока все элементы от i + 1 до n не будут перебраны.
898. Пусть даны две неубывающие последовательности вещественных чисел а1 ≤ a2 ≤ ... ≤ аn и b1 ≤ b2 ≤ ... ≤ bm. Требуется указать те места, на которые нужно вставлять элементы последовательности b1, b2, ..., bm в первую последовательность так, чтобы новая последовательность оставалась возрастающей.
899. Даны дроби (рi, qi — натуральные). Составить программу, которая приводит эти дроби к общему знаменателю и упорядочивает их в порядке возрастания.
900. Упорядочить массив а1, а2, ..., an по неубыванию с помощью алгоритма сортировки слиянием фон Неймана, когда каждая пара соседних элементов сливается в одну группу из двух элементов (последняя группа может состоять из одного элемента), каждая пара соседних двухэлементных групп сливается в одну четырехэлементную группу и т. д. При каждом слиянии новая укрупненная группа упорядочивается.
901. Сортировка подсчетом. Выходной массив заполняется значениями –1. Затем для каждого элемента определяется его место в выходном массиве путем подсчета количества элементов, строго меньших данного. Естественно, что все одинаковые элементы попадают на одну позицию, за которой следует ряд значений –1. После этого оставшиеся в выходном массиве позиции со значением –1 заполняются копией предыдущего значения.
902. «Хитрая» сортировка. Из массива путем однократного просмотра выбирается последовательность элементов, расположенных в порядке возрастания, переносится в выходной массив и заменяется во входном значением –1. Затем оставшиеся элементы включаются в полученную упорядоченную последовательность методом «погружения», когда очередной элемент путем ряда обменов «погружается» до требуемой позиции в уже упорядоченную часть массива.
* В этой и следующей задаче удобно использовать флаг (то есть переменную, могущую принимать только два значения: true или false; 0 или 1, от которых будет зависеть выполняемое действие).
* Здесь и в других задачах под удалением понимать исключение этого элемента из массива путем смещения всех следующих за ним элементов влево на 1 позицию и присваивание последнему элементу массива значения 0, если нет других оговорок.