TURBO PASCAL

Программы

Turbo Pascal

Игры

Документация

"Странности"

FAQ

Ссылки

Благодарности

Гостевая книга

От автора

Работа с массивами

Пользователь в первой части программы формирует одномерный массив с количеством числом элементов 10-15 и двумерный - с числом строк 8-12 и числом столбцов 6-10. Элементы этих массивов - целые числа формируются функцией Random(k), где k определяется по формуле k = N + n, где N - номер группы, а n - порядковый номер студента в группе. В задачах, где требуется нахождения делителей, необходимо учитывать, что само число и единица к делителям не относятся. Сформированные массивы выдаются на печать. Одномерные - в одну строку с пробелом между элементами, двумерные - построчно, так же с интервалом между элементами. При выполнении работы целесообразно использовать процедуры, разрабатываемые самостоятельно. Все исходные данные и результаты работы должны быть записаны в соответствующем файле на собственном носителе информации. Дальнейшее выполнение работы - по вариантам.

1. В одномерном массиве переставить местами элементы, находящиеся на четных и нечетных местах. Начальный и преобразованный массивы выдать на печать форматным выводом в одну строку. В двумерном массиве подсчитать и выдать на печать максимальные и минимальные элементы по каждой строке. Вычислить значение логарифма элемента [1,1] и прибавлять к нему последовательно все оставшиеся элементы 1-й строки, затем - все элементы 2-й строки, начиная с 1-го элемента, и т.п. до тех пор, пока начальное значение не увеличится в 5 раз. Выдать на печать индексы элемента, на котором процесс закончится.
2. Используя элементы одномерного массива, подсчитать и выдать на печать их среднее значение, среднее и среднее квадратическое отклонение. В двумерном массиве найти и выдать на печать индексы среднего элемента - "креста" , сумма элементов в котором - максимальна.
3. Преобразовать одномерный массив таким образом, чтобы сумма элементов в его первой половине была бы как можно ближе к сумме элементов его второй половины. Исходный и преобразованный массивы выдать на печать построчно. В двумерном массиве a[n,m] заменить его элементы вещественными числами, вычисляемыми по формуле a[i, j] = a[i, j] * ArcCos(i / (i + j)). Для каждого столбца найти и выдать на печать количество положительных и отрицательных элементов в нем. Элементы начального и образованного массивов выдать на печать построчно, в форматном виде.
4. Элементы одномерного массива d[n] преобразовать по формуле d[i] = e ^{i / d[i]}. В новом массиве найти и выдать на печать сумму элементов, порядковый номер которых делится на 3. Преобразовать элементы двумерного массива a[m,n] по формуле a[i, j] = i ^j, если i >= j и a[i, j] = j ⁱ - в ином случае. В этом массиве найти и выдать на печать квадратную матрицу m[3,3], сумма диагональных элементов в которой - минимальна.
5. Сопоставить одномерному массиву a[n] другой одномерный массив f[n], элементы которого вычисляются по формуле f[i] = Ln(a[i]) / ArcTan(e^i/10). Элементы этого массива переставить таким образом, чтобы меньшему номеру соответствовал бы меньший элемент. Элементы всех массивов выдать на печать в одну строку. В двумерном массиве найти и выдать на печать 5 наибольших элементов с указанием их адресов.
6. "Вырезать" из двумерного массива и выдать на печать треугольник , в котором среднее значение элементов - минимально. При выдаче указать индексы элемента, являющегося вершиной треугольника. Ввести вещественную переменную x и элементы исходного одномерного массива a[n] преобразовать по формулам - для четных номеров элементов a[i] = a[i] / e^x, а для нечетных - a[i] = Ln(a[i]) / Tan(x). На печать выдать исходный, преобразованный массивы и среднее значение элементов преобразованного массива.
7. В одномерном массиве переставить элементы таким образом, чтобы на 5 месте стояло бы наибольшее, а на 6 - наименьшее число. В двумерном массиве b[n,m] найти 4 последовательные элемента, сумма которых - максимальна. Обход для поиска выполнить по ходу часовой стрелки, начиная с элемента b[1,1].
8. Преобразовать элементы двумерного массива b[n,m] по формулам - если номер строки больше номера столбца, то b[i, j] = Ln(b[i, i] + b[j, j]) / Sqrt(b[i, j]), в ином случае, b[i, j] = (Sin(b[i, j] / 100). Для каждого столбца найти и выдать на печать среднее значение его элементов и среднее уклонение. В одномерном массиве найти и выдать на печать с указанием их порядковых номеров 4 наибольших элемента.
9. Выяснить, имеется ли среди элементов двумерного массива простые числа? Сообщить их адреса, подсчитать общее количество и среднее значение. Пересортировать все элементы одномерного массива и разделить его на две такие части, чтобы разность между суммами элементов в каждой из этих частей оказалась бы наименьшей. Результаты выдать на печать.
10. Преобразовать двумерный массив в новый двумерный с произведением числа строк и столбцов равным исходному. Оба массива выдать на печать. В одномерном массиве найти среднее значение элементов и построить новый одномерный массив из разностей соответствующих элементов и полученного среднего. Результаты выдать на печать.
11. В одномерном массиве, содержащем k элементов, найти 3 последовательных элемента, среднее значение которых - минимально. Выдать их на печать. Из элементов двумерного массива a[m,n] построить одномерный с числом элементов равным m^*n. Выдать на печать такую последовательность из k элементов, в которой сумма разностей ее элементов и элементов исходного одномерного массива - минимальная.
12. Заменить в одномерном массиве каждый из элементов суммой его делителей. В двумерном массиве найти квадрат размером 3·3, в котором сумма диагональных элементов - максимальна. Выдать его на печать.
13. Преобразовать двумерный массив таким образом, чтобы вместо тех, которые делятся на 7, стояли бы нули, а остальные элементы остались бы без изменений. Оба массива выдать на печать. Каждый из элементов одномерного массива заменить суммой цифр этого элемента. Найти максимальный и минимальный элементы. Исходный и преобразованный массивы выдать на печать.
14. В двумерном массиве найти такую совокупность элементов , которой разности сумм элементов по горизонтали и вертикали минимальны. Выяснить, имеются ли в одномерном массиве пары смежных элементов, разности между которыми равны 5. Соответствующие сообщения выдавать на печать.
15. В одномерном массиве заменить каждый элемент произведением его делителей. Вместо элементов, не имеющих делителей, проставить нули. Исходный и преобразованный массивы выдать на печать. Преобразовать исходный двумерный массив a[m,n] в одномерный f[m*n] и, считая каждый из элементов длиной стороны треугольника, найти такую тройку элементов, которые образуют треугольник с наибольшей площадью.
16. В двумерном массиве заменить каждый элемент частным от деления самого элемента на сумму его делителей. Найти и выдать на печать элементы исходного и нового массивов. В одномерном массиве найти и выдать на печать с указанием их порядковых номеров те элементы, число делителей в которых одинаково и равно t.
17. Найти все цифры в элементах одномерного массива и подсчитать, сколько раз встречается каждая. В двумерном массиве найти треугольник , сумма элементов в котором минимальна.
18. Найти и выдать на печать общие элементы одномерного и двумерного массивов. При отсутствии этого найти такие элементы одномерного и двумерного массивов, разность между которыми минимальна. В двумерном массиве найти "вырезку"  с наибольшей суммой элементов.
19. Элементы одномерного массива преобразовать в новый одномерный массив, в котором каждый элемент равен наибольшему делителю исходного, а элементы - простые числа оставлены без изменений. Оба массива выдать на печать. Для каждой строки двумерного массива подсчитать и выдать на печать количество элементов, кратных 3 и кратных 7.
20. Выяснить, имеются ли среди элементов двумерного массива простые числа? Сообщить их адреса, подсчитать общее количество и среднее значение. В одномерном массиве найти 4 последовательных элемента, общее число делителей которых - минимально. Выдать их на печать.
21. В одномерном массиве переставить элементы таким образом, чтобы на 2-м месте стояло бы наибольшее, а на 5-м - наименьшее число. Исходный и преобразованный массивы выдать на печать. Преобразовать двумерный массив в новый двумерный, в котором произведение числа строк и столбцов равно исходному. Оба массива выдать на печать.
22. По одномерному массиву a[n] составить другой одномерный массив f[n], элементы которого вычисляются по формуле f[i] = Ln(a[i]) / ArcTan(e^{i / 10}). Элементы этого массива переставить таким образом, чтобы меньшему номеру соответствовал больший элемент. Элементы всех массивов выдавать на печать построчно. В двумерном массиве найти и выдать на печать 4 наименьших элемента с указанием их положения в массиве.
23. Элементы одномерного массива d[n] преобразовать по формуле d[i] = d[i] * i ^j. В новом массиве найти и выдать на печать сумму элементов, порядковый номер которых делится на 3.
24. Для первого элемента одномерного массива подсчитать v₁ = e^{a[1] / 10}. Для каждого последующего элемента вычислить v_i таким же образом, находить и выдавать на печать суммы полученных элементов до тех пор, пока эта сумма не станет в два раза больше начального значения v₁. В двумерном массиве найти и выдать на печать последовательность из 5 элементов с наибольшим средним их значением. Обход массива выполнять "змейкой": .
25. В одномерном массиве найти среднее значение элементов и 3 таких, которые наиболее близки к нему. Двумерный массив разделить на два новых двумерных таким образом, чтобы число столбцов в них было равно числу столбцов исходного массива, а суммарное число строк в них - числу строк исходного. Заполнить эти массивы элементами исходного так, чтобы ни один элемент первого из них не превышал ни одного элемента второго.
26. Подсчитать сумму цифр каждого элемента двумерного массива и создать новый массив из этих сумм. В новом массиве для каждой строки найти и выдать на печать минимальный и максимальный элементы. В одномерном массиве переставить элементы таким образом, чтобы на 3-м месте стояло бы наименьшее, а на 6-м наибольшее число. Оба массива выдать на печать.
27. В двумерном массиве переставить строки таким образом, чтобы среднее значение элементов каждой строки возрастало по мере возрастания ее номера. Выяснить, содержатся ли в одномерном массиве простые числа. Преобразовать этот массив таким образом, чтобы все элементы, не являющиеся простыми числами, были заменены суммами их делителей. Исходный и преобразованный массивы выдать на печать.
28. Для каждого столбца двумерного массива вычислить максимальное и минимальное значения и их среднее. Переставить столбцы этого массива так, чтобы меньшему номеру соответствовало и меньшее среднее. Для каждого элемента одномерного массива найти делители и подсчитать, сколько раз встречается каждый из них. Результаты оформить в виде таблицы.
29. Разделить двумерный массив на 2 таким образом, чтобы число строк в каждом из них оставалось неизменным, а сумма элементов одного массива оказалась наиболее близкой к сумме элементов другого. Каждый из элементов одномерного массива заменить величиной x - целой степенью экспоненты, при которой е^x наиболее близка к соответствующему элементу. Исходный и преобразованный массивы выдать на печать.
30. Выяснить, имеются ли в одномерном массиве пары смежных элементов, разности между которыми не превышают t. Каждую из таких пар выдать на печать. Каждый из элементов двумерного массива заменить целой частью его логарифма и выдать на печать исходный и новый массивы.
31. Элементы одномерного массива переставить таким образом, чтобы сначала располагались по возрастанию четные элементы, а затем - по убыванию нечетные. Из двумерного массива выделить прямоугольное окно размером 2·3 элемента, среднее значение элементов в котором - максимально.
32. Для каждого столбца двумерного массива подсчитать максимальное и минимальное значения и их среднее. Переставить столбцы этого массива так, чтобы меньшему номеру соответствовало большее среднее. Для каждого элемента одномерного массива найти делители и подсчитать, сколько раз встречается каждый из них. Результаты оформить в виде таблицы.
33. Элементы одномерного массива преобразовать в новый одномерный массив, в котором каждый элемент равен среднему значению делителей исходного, а элементы - простые числа оставлены без изменений. Оба массива выдать на печать.

(с)Все права защищены