Составить программу для выполнения заданных действий над массивом чисел. В программе предусмотреть ввод значений его элементов

1. В заданном массиве А из N элементов есть хотя бы один отрицательный элемент. Вычислить произведение элементов массива до первого отрицательного.

2. В заданном массиве B из N элементов есть хотя бы один нуль. Вычислить произведение элементов массива до первого нуля.

3. В заданном массиве X из N элементов умножить все элементы массива, имеющие четные номера на максимальный элемент всего массива.

4. В заданном массиве Y из N элементов вычислить сумму положительных элементов и произведение отрицательных.

5. В заданном массиве D из N элементов все отрицательные элементы заменить на их квадраты, а все положительные элементы разделить на 2.

6. В заданном массиве С из N элементов найти максимальный элемент и его номер, а также минимальный элемент и его номер.

7. В заданном массиве Z из 15 элементов вычислить сумму всех элементов за исключением элемента, имеющего максимальное значение.

8. В заданном целочисленном массиве P из N элементов вычислить произведение элементов, имеющих четные значения, а также количество положительных элементов.

9. В заданном массиве S из N элементов вычислить сумму и произведение элементов, значения которых больше заданного числа X (значение Х задается при помощи оператора ввода).

10. В заданном массиве Н из 30 элементов найти сумму первых 10 элементов, произведение последних 10 элементов и среднее арифметическое элементов, имеющих номера от 11 до 20.

11. В заданном массиве К из N элементов найти сумму элементов, имеющих четные номера, и произведение элементов,имеющих нечетные номера.

12. В заданном массиве В из N элементов переставить местами первый и минимальный элементы, а также последний и максимальный элементы.

13. В заданном массиве М из N элементов заменить все элементы массива,кратные 4, на единицы.

14. В заданном целочисленном массиве А из N элементов все элементы, дающие остаток от деления на 3, равный 2, заменить их удвоенным произведением.

15. В заданном целочисленном массиве Р из N элементов вычислить среднее арифметическое его элементов, имеющих четное значение.

à Задание 2.3

Составить программу для выполнения заданных действий над двумерным массивом вещественных чисел A(N,M). В программе предусмотреть ввод значений его элементов, вывод исходной и, при необходимости, преобразованной матриц.

1. Вычислить и запомнить сумму и число положительных элементов каждого столбца матрицы. Результаты отпечатать в виде двух строк.

2. Вычислить и запомнить сумму и число отрицательных элементов каждой строки матрицы. Результаты отпечатать в виде двух столбцов.

3. Вычислить сумму и число элементов матрицы, находящихся под главной диагональю и на ней.

4. Вычислить сумму и число элементов матрицы, находящихся над главной диагональю и на ней.

5. Записать на место отрицательных элементов матрицы нули, а на место положительных элементов матрицы — единицы.

6. Найти максимальный элемент на главной диагонали матрицы и присвоить нулевые значения другим элементам строки и столбца, на пересечении которых он стоит.

7. Найти наибольший и наименьший элементы матрицы и поменять их местами

8. Найти строку с наибольшей и наименьшей суммой элементов. Вывести на печать найденные строки и суммы их элементов.

9. Найти столбец с наибольшей и наименьшей суммой элементов. Вывести на печать найденные столбцы и суммы их элементов.

10. Каждый элемент строки разделить на предварительно рассчитанную сумму элементов этой строки.

11. Удалить последнюю строку матрицы и вывести ее на печать.

12. Удалить последний столбец матрицы и вывести ее на печать.

13. Найти максимальный элемент на главной диагонали матрицы.

14. Найти максимальный по модулю элемент матрицы и вычислить сумму столбца, в котором он находится.

15. Найти минимальный по модулю элемент матрицы и вычислить сумму строки, в которой он находится.

ПРИЛОЖЕНИЕ 1

Варианты заданий.

Таблица 2

ЛИТЕРАТУРА

1. Йенсен К. Руководство для пользователя и описание языка Паскаль /К. Йенсен, Н. Вирт: Пер. с англ. - М.: Мир, 1979. – 532 с.

2. Форсайт Р. Паскаль для всех /Р. Форсайт: Пер. с англ. - М.: Машиностроение, 1986. – 312 с.

3. Абрамов С.А. Начала программирования на языке Паскаль /С.А. Абрамов, Е.В. Зима - М.: Наука, 1987. - 114 с.

4. Перминов О.Н. Программирование на языке Паскаль / О.Н. Перминов - М.: Радио и связь, 1988. - 348 с.

5. Фаронов В.В. Программирование на персональных ЭВМ в среде Турбо-Паскаль /В.В. Фаронов - М.: Изд-во МГТУ, 1990. - 547 с.

6. Джон З. Решение задач в системе Турбо-Паскаль: / З. Джон, К. Харроу: Пер. с англ. - М.: Финансы и статистика, 1991. 643 с.

7. Рапаков Г.Г. Программирование в среде Turbo Pascal. Часть 1 / Г.Г. Рапаков, Н. А. Бубнова, С.Ю. Ржеуцкая - Вологда: ВоГТУ, 2001. – 81 с.