Поможем написать учебную работу
Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
абораторная работа № 17.
Вариант 1.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по невозрастанию первой или последней цифры, удалить из последовательности составные числа и продублировать простые числа, содержащие цифры 1,5 или 7. В противном случае упорядочить последовательность по неубыванию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 2.
Ввести последовательность натуральных чисел. Если в последовательности нет чисел - палиндромов, упорядочить последовательность по невозрастанию. В противном случае удалить из последовательности простые числа и продублировать числа, заканчивающиеся нулем. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 3.
Ввести последовательность натуральных чисел. Если в последовательности есть трехзначные числа, состоящие только из четных цифр, упорядочить последовательность по неубыванию первой цифры. В противном случае удалить из последовательности числа с четным количеством цифр и продублировать остальные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 4.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию первой или последней цифры, удалить из последовательности числа, в которые не входят цифры 2,4 и 6, и продублировать числа, содержащие цифры 6 и 9. В противном случае упорядочить последовательность по неубыванию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 5.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по невозрастанию первой или последней цифры, удалить из последовательности однозначные числа и продублировать числа - палиндромы длиной более одной цифры. В противном случае упорядочить последовательность по неубыванию первой цифры. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 6.
Ввести последовательность натуральных чисел. Если в последовательности нет ни одного числа, содержащего две одинаковых цифры, упорядочить последовательность по невозрастанию последней цифры числа. В противном случае удалить из последовательности числа, начинающиеся четной цифрой и продублировать остальные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 7.
Ввести последовательность натуральных чисел. Если в последовательности есть хотя бы одно число, начинающееся цифрой 1, упорядочить последовательность по неубыванию. В противном случае удалить из последовательности числа, кратные трем, кроме числа 3, и продублировать простые числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 8.
Ввести последовательность натуральных чисел. Если в последовательности нет трехзначных чисел, состоящих только из нечетных цифр, упорядочить последовательность по невозрастанию первой цифры. В противном случае удалить из последовательности числа не содержащие цифру 8, и продублировать остальные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 9.
Ввести последовательность натуральных чисел. Если в последовательности нет ни одного числа, начинающегося цифрой 3, упорядочить последовательность по невозрастанию последней цифры. В противном случае удалить из последовательности четные числа, кроме числа 2, и продублировать простые числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 10.
Ввести последовательность натуральных чисел. Если в последовательности есть хотя бы одно число, содержащее две одинаковых цифры, упорядочить последовательность по неубыванию первой цифры числа. В противном случае удалить из последовательности четные числа и продублировать нечетные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 11.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию или по невозрастанию, удалить из последовательности числа, кратные 15, и продублировать простые числа. В противном случае упорядочить последовательность по невозрастанию первой цифры. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 12.
Ввести последовательность натуральных чисел. Если в последовательности нет трехзначных чисел, все цифры которых различны, упорядочить последовательность по неубыванию. В противном случае удалить из последовательности числа, состоящие только из четных цифр, и продублировать числа, состоящие только из нечетных цифр. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 13.
Ввести последовательность натуральных чисел. Если в последовательности нет ни одного простого числа, упорядочить последовательность по невозрастанию. В противном случае удалить из последовательности числа, состоящие только из нечетных цифр, и продублировать числа, состоящие только из четных цифр. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 14.
Ввести последовательность натуральных чисел. Если в последовательности есть не менее 3-х чисел, заканчивающихся цифрой 2 или 4, упорядочить последовательность по невозрастанию первой цифры. В противном случае удалить из последовательности простые числа, и продублировать числа, кратные 10. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 15.
Ввести последовательность натуральных чисел. Если в последовательности есть хотя бы одно трехзначное число - палиндром, упорядочить последовательность по неубыванию. В противном случае удалить из последовательности числа, заканчивающиеся нулем и продублировать простые числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 16.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию первой или последней цифры, удалить из последовательности числа состоящие только из цифр 1,2,3,4,5, и продублировать числа, содержащие цифры 6 или 8. В противном случае упорядочить последовательность по невозрастанию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 17.
Ввести последовательность натуральных чисел. Если в последовательности есть два одинаковых числа, упорядочить последовательность по невозрастанию последней цифры числа. В противном случае удалить из последовательности числа, содержащие цифру 3, и продублировать числа, содержащие цифру 7 и не содержащие цифру 3. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 18.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по убыванию или по возрастанию, удалить из последовательности простые числа, и продублировать числа, кратные 10. В противном случае упорядочить последовательность по неубыванию первой цифры. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 19.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию или по невозрастанию последней цифры, удалить из последовательности простые числа, и продублировать числа кратные 12. В противном случае упорядочить последовательность по неубыванию первой цифры. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 20.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию или по невозрастанию, удалить из последовательности числа - палиндромы, и продублировать числа, заканчивающиеся нулем. В противном случае упорядочить последовательность по неубыванию первой цифры. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 21.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию или по невозрастанию, удалить из последовательности числа начинающиеся цифрой 1, и продублировать числа начинающиеся цифрой 7 или 9. В противном случае упорядочить последовательность по невозрастанию первой цифры. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 22.
Ввести последовательность натуральных чисел. Если в последовательности нет двух одинаковых чисел, упорядочить последовательность по неубыванию последней цифры числа. В противном случае удалить из последовательности числа, не содержащие цифру 4, и продублировать числа, содержащие цифры 4 и 2. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 23.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по невозрастанию первой или последней цифры, удалить из последовательности числа с суммой цифр, кратной 3, и продублировать простые числа, содержащие цифры 1,5 или 7. В противном случае упорядочить последовательность по невозрастанию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 24.
Ввести последовательность натуральных чисел. Если в последовательности есть числа - палиндромы, упорядочить последовательность по невозрастанию. В противном случае удалить из последовательности простые числа и продублировать числа, сумма цифр которых четная. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 25.
Ввести последовательность натуральных чисел. Если в последовательности есть четырехзначные числа, состоящие только из нечетных цифр, упорядочить последовательность по невозрастанию первой цифры. В противном случае удалить из последовательности числа с четным количеством цифр и продублировать остальные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 26.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию первой или последней цифры, удалить из последовательности числа, в которые входят цифры 2 и 3 (одновременно), и продублировать числа, начинающиеся цифрой 5. В противном случае упорядочить последовательность по неубыванию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 27.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию первой или последней цифры, удалить из последовательности числа с суммой цифр, кратной 5, и продублировать простые числа, содержащие цифру 3. В противном случае упорядочить последовательность по неубыванию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 28.
Ввести последовательность натуральных чисел. Если в последовательности нет чисел - палиндромов, упорядочить последовательность по неубыванию. В противном случае удалить из последовательности простые числа и продублировать числа, сумма цифр которых нечетна. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 29.
Ввести последовательность натуральных чисел. Если в последовательности есть четырехзначные числа, состоящие только из четных цифр, упорядочить последовательность по неубыванию первой цифры. В противном случае удалить из последовательности числа с нечетным количеством цифр и продублировать остальные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 30.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по невозрастанию первой или последней цифры, удалить из последовательности числа, в которые входят цифры 1 и 5 (одновременно), и продублировать числа, заканчивающиеся цифрой 7. В противном случае упорядочить последовательность по невозрастанию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 31.
Ввести последовательность натуральных чисел. Если в последовательности есть простые числа, упорядочить последовательность по неубыванию суммы цифр. В противном случае удалить из последовательности числа с нечетным количеством цифр и продублировать 4-х значные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 32.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по невозрастанию или по неубыванию, удалить из последовательности числа, в которые входят цифры 2 и 8 (одновременно), и продублировать числа, заканчивающиеся цифрой 5. В противном случае упорядочить последовательность по неубыванию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 33.
Ввести последовательность натуральных чисел. Если последовательность не упорядочена по невозрастанию и не упорядочена по неубыванию, удалить из последовательности простые числа и продублировать числа кратные 8. В противном случае упорядочить последовательность по неубыванию суммы цифр. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 34.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по невозрастанию, то удалить из последовательности простые числа и продублировать составные числа, содержащие цифру 8. В противном случае упорядочить последовательность по неубыванию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 35.
Ввести последовательность натуральных чисел. Если в последовательности есть числа - палиндромы, упорядочить последовательность по невозрастанию. В противном случае удалить из последовательности числа, начинающиеся цифрой 3 и продублировать числа, начинающиеся цифрой 2 или 7. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 36.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию первой или последней цифры, удалить из последовательности числа состоящие только из нечетных цифр, и продублировать числа, содержащие цифры 6 и 8 (одновременно). В противном случае упорядочить последовательность по неубыванию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 37.
Ввести последовательность натуральных чисел. Если в последовательности нет чисел, начинающихся цифрой 7, упорядочить последовательность по неубыванию. В противном случае удалить из последовательности простые числа и продублировать четные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 38.
Ввести последовательность натуральных чисел. Если в последовательности нет простых чисел, то упорядочить последовательность по неубыванию суммы цифр. В противном случае удалить из последовательности числа, начинающиеся цифрой 7 и продублировать числа, начинающиеся цифрой 3. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 39.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию первой или последней цифры, удалить из последовательности составные числа и продублировать простые числа, содержащие цифры 3 или 9. В противном случае упорядочить последовательность по неубыванию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 40.
Ввести последовательность натуральных чисел. Если в последовательности нет чисел - палиндромов, упорядочить последовательность по неубыванию. В противном случае удалить из последовательности числа-палиндромы и продублировать числа, заканчивающиеся нулем. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 41.
Ввести последовательность натуральных чисел. Если в последовательности есть трехзначные числа, состоящие только из четных цифр, упорядочить последовательность по невозрастанию первой цифры. В противном случае удалить из последовательности числа с нечетным количеством цифр и продублировать остальные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 42.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по невозрастанию первой или последней цифры, удалить из последовательности числа, в которые не входят цифры 3,5 и 7, и продублировать числа, содержащие цифры 7 и 5. В противном случае упорядочить последовательность по невозрастанию. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 43.
Ввести последовательность натуральных чисел. Если последовательность упорядочена по неубыванию суммы цифр, удалить из последовательности однозначные числа и продублировать числа - палиндромы длиной более одной цифры. В противном случае упорядочить последовательность по неубыванию последней цифры. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 44.
Ввести последовательность натуральных чисел. Если в последовательности нет ни одного числа, содержащего три одинаковых цифры, упорядочить последовательность по невозрастанию последней цифры числа. В противном случае удалить из последовательности числа, начинающиеся нечетной цифрой и продублировать остальные числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.
Вариант 45.
Ввести последовательность натуральных чисел. Если в последовательности есть хотя бы одно число, начинающееся цифрой 1 и содержащее цифру 0, упорядочить последовательность по неубыванию. В противном случае удалить из последовательности числа, кратные пяти, и продублировать простые числа. Последовательность хранить в двусвязном циклическом списке с фиктивным элементом. Перед завершением программы очистить динамическую память с помощью процедуры Dispose.