Двумерные массивы.

153.	Найти наибольший и наименьший элементы матрицы Х(k,n) и поменять их местами.
154.	Найти максимальный элемент главной диагонали матрицы X(5,5).
155.	Дана матрица Y(m,n). Найти столбец с наибольшей и наименьшей суммой элементов.
156.	Имеется матрица S(m,n). Найти максимальный из всех минимальных элементов строк. Вывести номер строки матрицы S, в которой расположено выбранное число.
157.	Вычислить сумму элементов двух главных диагоналей матрицы С(5,5).
158.	Из матрицы Y(k,k) получить вектор T, элементами которого являются элементы главной диагонали матрицы.
159.	Сформировать диагональную матрицу А(p,p). У диагональной матрицы все элементы равны нулю, кроме диагональных.
160.	Получить вектор B, элементами которого являются произведения элементов в каждой строке матрицы A(5,4).
161.	Из матрицы Z(4,5) получить вектор А, содержащий положительные элементы матрицы.
162.	Получить матрицу К(5,5), элементами которой являются квадраты сумм номеров строк и столбцов.
163.	Из матрицы Х(5,4) получить матрицу Н, поменяв местами строки и столбцы.
164.	. Имеется целочисленная матрица A(k,l). Проверить, есть ли в ней элементы, равные нулю. Если есть, найти номер первого из них.
165.	Даны два квадратных массива А и В. Вывести на экран тот из них, у которого след меньше (след – сумма элементов главной диагонали).
166.	Определить: а) есть ли в данном массиве отрицательный элемент; б) есть ли два одинаковых элемента; в) есть ли данное число А среди элементов массива (массив имеет размер n*n).
167.	В каждой строке сменить знак максимального по модулю элемента на противоположный.
168.	Даны два двумерных массива одинакового размера. Создать третий массив того же размера, каждый элемент которого равен сумме соответствующих элементов первых двух.
169.	Заполнить квадратный массив В размером n*n. Например, для n=6 1 12 13 24 25 36 2 11 14 23 26 35 3 10 15 22 27 34 4 9 16 21 28 33 5 8 17 20 29 32 6 7 18 19 30 31
170.	Начиная с k-го столбца, сдвинуть их вперед, а первые k поставить на место последних.

Перечисляемый тип данных

171.	По заданным номеру квартала, дате, включающей число, название месяца, год и дню недели, которым является данное число, требуется определить последующую дату вводимого в программе дня недели, ближайшего к указанной дате. Указания. Использовать в программе ограниченный и перечислимый тип данных, оператор варианта. Протокол работы программы для исходной даты 30 сентября 1994 года пятница: = = > 3 30 9 1994 5 1 октября 1994 года - 4 квартал – суббота
172.	Составьте программу телефонный справочник одноклассников, которая обеспечивает ввод данных, поиск номера телефона по фамилии. В записи о каждом однокласснике содержатся следующие сведения: фамилия, имя, телефон, хобби. Найти номер Петрова; Подсчитать и вывести список всех абонентов по критерию « увлечение компьютерными играми»; Подсчитать и вывести список всех абонентов по имени «Михаил» и критерию «увлечение компьютерными играми».
173.	Сведения об успеваемости состоят из фамилии учащего­ся и оценок по трем предметам физике, математике и вычисли­тельной технике. Получить список пяти лучших учащихся по математике; Сравнить успеваемость каждого ученика по всем пред­метам и вывести в порядке возрастания; Вычислить средний балл по всем предметам.

Записи

174.	К какому типу относится следующее описание? kniga=record nazvan: string[25]; godizdat:1000..1988; zena:real; end;
175.	Определите количество полей в данной записи: Type Auto = record Model, Name, Address, Color : string[30]; Year: integer; Number: 0..9999; End.
176.	Известно, что TYPE TIME=RECORD CHAS:0..23; MINUT, SEKUND: 0..59; VAR T1,T2:TIME; Написать программу, которая вводит значения полей записей T1 и T2 и печатает TRUE, если T1 предшествует T2, и печатает FALSE в противном случае.
177.	Имеется описание: type family=record glavafamily: string[15]; vosrast1:18..100; supruga: string[10]; vosrast2:18..100; dety: string[5]; end; var a,b:family; Занести исходную информацию в переменную A, без использования оператора присоединения и продублировать ее в переменную B.
178.	Определить запись, включающую в себя следующую информацию: название завода изготовителя; название завода поставщика сырья; номер магазина-потребителя; названия производимых товаров, 50 наименований; цена каждого товара за 1 штуку в рублях и копейках; количество каждого товара в штуках. Все наименования содержат не более 15 символов.
179.	Дана ведомость учащихся, занимающихся в кружке по программированию: Алешина Елена 5 Ковалев Иван 5 Андрианов Глеб 4 Поддубный Игорь 4 Павликова Юля 5 Кемарская Ира 5 Агафонов Стас 5 Антонова Оля 5 Определить количество учащихся, занимающихся в кружке на 5, число учащихся с фамилией, начинающейся на букву "А".