Заглавная страница Избранные статьи Случайная статья Познавательные статьи Новые добавления Обратная связь FAQ Написать работу КАТЕГОРИИ: ТОП 10 на сайте Приготовление дезинфицирующих растворов различной концентрацииТехника нижней прямой подачи мяча. Франко-прусская война (причины и последствия) Организация работы процедурного кабинета Смысловое и механическое запоминание, их место и роль в усвоении знаний Коммуникативные барьеры и пути их преодоления Обработка изделий медицинского назначения многократного применения Образцы текста публицистического стиля Четыре типа изменения баланса Задачи с ответами для Всероссийской олимпиады по праву
Мы поможем в написании ваших работ! ЗНАЕТЕ ЛИ ВЫ?
Влияние общества на человека
Приготовление дезинфицирующих растворов различной концентрации Практические работы по географии для 6 класса Организация работы процедурного кабинета Изменения в неживой природе осенью Уборка процедурного кабинета Сольфеджио. Все правила по сольфеджио Балочные системы. Определение реакций опор и моментов защемления |
Ввод (заполнение) элементов двумерного массива (матрицы)Содержание книги
Похожие статьи вашей тематики
Поиск на нашем сайте For i:=1 to n do For j:=1 to m do Readln(A[i,j]); А Заполнение двумерного массива по строке. Массив содержит 3 строки и 4 столбца, т.е. 3х4=12 элементов
For j:=1 to 4 do a[i,j]:=random(100); 1. б Заполнение двумерного массива по столбцу:
For i:=1 to 3 do a[i,j]:=random(100); 2а. Печать матрицы на экран: For i:=1 to n do begin For j:=1 to m do Write (A[i,j]); {Вывод эл-тов одной строки матрицы} Writeln; { переход на следующую строку экрана} end; где А - имя массива;i - индекс строки;j - индекс столбца; n - количество элементов в строке;m - количество элементов в столбце. 2б. Печать 3-й строки на экран: For i:=1 to n do Write (A[3,i],’ ‘); {Вывод эл-тов одной строки матрицы} end; А. Вычисление суммы элементов 2-той строки. s:=0; For i:=1 to n do s:=s+a[2,i]; Writeln(‘Сумма элементов 2-й строки = ’,s); Б. Вычисление суммы элементов 2-го столбца. s:=0; For i:=1 to n do s:=s+a[i,2]; Writeln(‘Сумма элементов 2-го столбца = ’,s); Вычисление суммы элементов всего двумерного массива. S:=0; for i:=1 to m do for j:=0 to n do S:=S+a[i,j]; Задача поиска максимального (минимального) элемента и его индексов. Ищем максимальный элемент каждой строки: For i:=0 to m do begin max:=a[i,1]; ind_L:=i; {сохраняем номер строки} ind_C:=1; {заносим номер 1 - первый столбец} for j:=1 to n do if a[i,j]>max then begin max:=a[i,j]; ind_C:=j {сохраняем номер j-ого столбца} end; writeln(‘max строки ’,i,’=’,max) end; Алгоритм поиска минимального элемента и его индексов для всего массива. Min:=a[1,1]; ind_L:=1; ind_C:=1; for i:=1 to m do for j:=1 to n do if a[i,j]<min then begin min:=a[i,j]; ind_L:=i; ind_C:=j; end; Квадратные матрицы. Type mas4x4=array[1..4,1..4] of integer; var a: mas4x4;
Главная диагональ - элементы a11, a22, a33, a44 (индексы элементов, расположенных на главной диагонали (i=j) Побочная диагональ - элементы a41, a32, a23, a14 (сумма индексов элементов на 1 больше размерности строки (или столбца), т.е. i+j=4+1 или i+j=n+1. На рисунке главная диагональ закрашена сплошным серым цветом, побочная - черным. Элементы, расположенные над главной диагональю, Для индексов элементов, расположенных над главной диагональю выполняется отношение i<j; Элементы, расположенные под главной диагональю, Для индексов элементов, расположенных под главной диагональю выполняется отношение i>j; Примеры: 1) Найти сумму элементов главной диагонали: S:=0; for i:=1 to n do S:=S+a[i,i]; 2) Найти минимальный элемент побочной диагонали: min:=a[1,n]; for i:=1 to n do if a[i,n+1-i]<min then min:=a[i,n+1-i];
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
Последнее изменение этой страницы: 2016-12-30; просмотров: 529; Нарушение авторского права страницы; Мы поможем в написании вашей работы! infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 216.73.216.198 (0.01 с.) |