Индивидуальное задание № 3

Тема: Создание программ для обработки одномерных и двумерных массивов

Цель: практически закрепить навыки по отработке алгоритмов обработки одномерных и двумерных массивов в программах на языке Turbo Pascal

Ход работы

1. Вверху экрана в разных строках выведите текст "Индивидуальное задание № 3" и "Вариант №__";

2. Ниже в левой части выведите текст "Программу составил:". На этой же строке в правой части "студент (ка) гр_______". Ниже под словом "студент (ка)" выведите фамилию и имя;

3. Согласно своего варианта решить задачу по обработке одномерного массива. При этом массив заполняется с клавиатуры с поясняющим текстом;

4. Согласно своего варианта решить задачу по обработке двумерного массива. При этом массив заполняется случайным образом на произвольном отрезке. Размер массива и концы отрезка ввести с клавиатуры. После заполнения массива вывести его на экран с поясняющим текстом;

5. Программу оформить в цветовой гамме. Цвета подобрать самостоятельно на свой вкус.

6. Оформить отчет по заданию в соответствии с инструкцией (см. инструкцию к индивидуальным заданиям)

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

№ по списку	Одномерный массив	Двумерный массив
1, 23	Имеются данные о том, какую прибыль получило предприятие в течение года в каждом месяце. Определите номер месяца, в котором была получена наибольшая прибыль. Сколько всего прибыли получило предприятие?	Найти среднее арифметическое в каждой строке матрицы. Элементы главной диагонали заменить единицами.
2, 24	Имеются данные о температуре воздуха за сентябрь. Определите, когда был самый теплый день. Какова средняя температура за месяц?	В двумерном массиве найти максимальный элемент каждого столбца. Найти сумму элементов строки, находящейся посередине массива.
3, 25	Имеются данные о зарплате N работников. Определите, насколько максимальная зарплата превышает минимальную зарплату?	Найти максимальный элемент в нечетных строках матрицы. Умножить элементы строки, в которой находится максимальный элемент на найденное значение.
4, 26	Имеются данные о том, сколько изделий сделал каждый из N работников. Определите общую сумму произведённых изделий, какой по счету работник произвёл наибольшее количество?	Определить количество отрицательных элементов в каждой строке матрицы. Прибавить значение, введенное с клавиатуры, ко всем элементам матрицы.
5, 27	Имеется группа из N человек разного возраста. Определите средний возраст членов группы. Какой максимальный возраст в группе?	Определите номер столбца матрицы с максимальным количеством элементов, равных 1. Вычесть из элементов этого столбца найденное значение
6, 28	Пусть имеются данные о курсе рубля за август. Определите, когда рубль достиг максимального курса? Определите средний курс за месяц.	Найти среднее арифметическое в каждом столбце матрицы. Определить номер столбца, содержащего наименьшее среднее значение
7, 29	Имеются данные о том, сколько изделий произвёл каждый из N работников. Определите, сколько человек произвело более 5 изделий? Какой по счету работник произвел меньше всех	Найти минимальный элемент в каждой строке двумерного массива. Вычесть из всех элементов k-го столбца минимальное значение первой строки.
8, 30	Имеется группа из N человек. Определите количество несовершеннолетних и количество людей старше 50 лет. Какой по счету член группы самый молодой?	Определите количество нулевых элементов в каждой строке. Умножьте элементы последнего столбца на введенное значение p
9	Имеются данные об успеваемости класса из N человек (по 100 бальной системе). Определите, сколько человек имеют средний балл не ниже 86 и сколько не выше 71. Каков средний балл группы?	Составить программу, находящую сумму нечетных элементов в каждой строке двумерной матрицы. Заменить нулями элементы побочной диагонали.
10	Имеются данные о продажах товара за июнь. Определите, когда был зафиксирован максимальный объем продаж. Определите общий объем продаж за месяц	Составить программу, находящую количество отрицательных элементов в каждом столбце. Прибавить значение S к элементам предпоследней строки.
11	Имеется группа из N человек разного роста. Определите, сколько человек имеют рост ниже среднего по группе?	Составить программу, находящую разницу между максимальным и минимальным элементами в каждой строке массива.
12	Имеются данные о том, сколько изделий произвёл каждый из N работников. Определите, какой работник сделал меньше всех. Сколько работников сделали более 10 изделий?	Составить программу, находящую количество четных элементов в каждом столбце. Найти, в каком столбце количество четных элементов больше.
13	Имеются данные о том, какую прибыль получило предприятие в течение года в каждом месяце. Определить прибыль по каждому кварталу. Узнать, в каком квартале получена наибольшая прибыль?	Найти среднее арифметическое в каждом столбце массива. Элементы четных строк увеличить вдвое.
14	Имеются данные о температуре воздуха за март. Определите, среднюю температуру первой и второй половин месяца отдельно. В какой день (дни) температура воздуха была наименьшей?	В двумерном массиве найти количество положительных элементов каждого столбца. Узнать, в каком столбце количество положительных элементов больше.
15	Имеются данные о зарплате N сотрудников. Определите среднюю зарплату у сотрудников? Какое количество сотрудников имеют зарплату ниже средней?	Найти максимальный элемент в четных столбцах матрицы. Среди полученных значений найти среднее.
16	Имеются данные о том, сколько изделий сделал каждый из N работников. Сколько работников и под какими номерами произвели минимальное количество изделий?	Найти количество четных элементов в каждой строке матрицы. Определить, в какой строке количество четных элементов меньше.
17	Имеются данные о стаже N сотрудников предприятия. Определить, кто (под какими номерами) из сотрудников является ветераном труда (т.е. проработал более 30 лет). Найти количество молодых сотрудников со стажем не более 5 лет.	Определите номер строки матрицы с количеством элементов, больших 3. К элементам побочной диагонали прибавить значение T.
18	Пусть имеются данные о курсе рубля за июнь. Определите разницу между наибольшим и наименьшим курсом. В какой день курс был наибольшим?	Найти произведение ненулевых элементов в каждом столбце матрицы. Определить номер столбца, содержащего наименьшее произведение
19	Имеются данные о том, сколько изделий произвёл каждый из N работников. Определите среднее значение произведенных изделий. Вывести номера работников, изготовивших наибольшее число изделий.	Найти минимальный элемент в каждой четной строке двумерного массива. Найти произведение элементов k-го столбца.
20	Имеются данные возраста N человек. Определите количество человек, возраст которых попадает в диапазон от A до B. Определите средний возраст группы.	Определите количество ненулевых элементов в каждом столбце. Найти номер столбца, содержащего наименьшее количество ненулевых элементов
21	Имеются данные об успеваемости группы из N студентов (по 5 бальной системе). Определите количество студентов и номера студентов, имеющих средний балл не ниже 4. Определить, количество студентов со средним баллом 5?	Составить программу, находящую количество отрицательных элементов в каждом нечетном столбце двумерной матрицы. Элементы второй строки заменить на противоположные
22	Имеются данные о продажах товара за декабрь. Определите общий объем продаж за месяц. В какой день было продано больше всего товара, в какой день – меньше всего.	Составить программу, находящую количество отрицательных элементов в каждой строке. Элементы последней строке возвести в квадрат.