Лабораторная работа 13 Работа в среде Турбо Паскаль. Двумерные массивы. Замена строк и столбцов в матрице. Транспонирование матрицы.

Презентация:



Advertisements
Похожие презентации
Лабораторная работа 12 Работа в среде Турбо Паскаль. Двумерные массивы. Поиск наибольших и наименьших элементов. Замена положений наибольшего и наименьшего.
Advertisements

Лабораторная работа 9 Работа в среде Турбо Паскаль. Одномерные массивы. Описание массивов. Ввод, вывод массивов. Суммирова- ние, среднее арифметическое,
5.Дана матрица А и вектор Х соответствующих размерностей. Нечетные строки матрицы заменить элементами вектора Х. Результаты работы: n=4 m=
3. Дана прямоугольная матрица, элементами которой являются целые числа. Поменять местами ее строки следующим образом: первую строку с последней, вторую.
const n=10; var a:array[1..n] of integer; i,j,c,b,k:integer; begin randomize; for i:=1 to n do begin a[i]:=random(11)-5;write(a[i]:5) end;writeln;
Тема: « Вставка- удаление элементов массива » :18:06.
Двумерные массивы Решение задач из сборника «Задачи по программированию» под редакцией С. Окулова.
Тема: «Понятие квадратная матрица» :17:47.
Лабораторная работа 7, 8 Работа в среде Турбо Паскаль. Вычисление произведения (суммы) заданного количес- тва членов ряда. Вычисление произведения (суммы)
Двумерным массивом называется совокупность данных, каждое значение которых, зависит от его положения в строке и в столбце.
Двумерные массивы ( матрицы ) на языке PASCAL Каждый элемент имеет свой номер, как у одномерных массивов, но сейчас номер уже состоит из двух чисел – номера.
Матрицы Матрицей называется таблица n * m (n строк, m столбцов). Пример. Матрица 3 * 3 имеет вид а 11 а 12 а 13 а 21 а 22 а 23 а 31 а 32 а 33 Элемент матрицы.
Двумерным массивом называется совокупность данных, каждое значение которых, зависит от его положения в строке и в столбце.
Шутилина Л.А., A[1,1]A[1,2]A[1,3]A[1,4]A[1,5] A[2,1]A[2,2]A[2,3]A[2,4]A[2,5] A[3,1]A[3,2]A[3,3]A[3,4]A[3,5] A[4,1]A[4,2]A[4,3]A[4,4]A[4,5]
A[1,1]A[1,2]A[1,3]A[1,4]A[1,5] A[2,1]A[2,2]A[2,3]A[2,4]A[2,5] A[3,1]A[3,2]A[3,3]A[3,4]A[3,5] A[4,1]A[4,2]A[4,3]A[4,4]A[4,5] Двумерный массив можно представить.
Лабораторная работа 14 Работа в среде Турбо Паскаль. Составление программ с использованием процедур.
Лабораторная работа 6 Работа в среде Турбо Паскаль. Чтение и составление программ циклических вычислительных процессов.
PROGRAM example1; const m=100; var a : ARRAY [1.. m] of INTEGER; i,k,n,q : INTEGER; BEGIN readln (n); randomize; WRITELN('Полученный массив:' ); FOR i.
Лабораторная работа 15 Работа в среде Турбо Паскаль. Составление программ с использованием функций.
Упорядоченный набор данных одного типа называется массивом. Каждый элемент массива описывается в общем виде как A[i], где A – имя массива, i – номер элемента.
Транксрипт:

Лабораторная работа 13 Работа в среде Турбо Паскаль. Двумерные массивы. Замена строк и столбцов в матрице. Транспонирование матрицы.

Пример 13.1 Поменять местами первую и вторую строки матрицы A( 3, 3). Program Pr_13_1; const m=3; n=3; var a:array[1..m,1..n] of real; i,j:integer; buf:real; begin writeln('vvedite massiv'); for i:=1 to m do for j:=1 to n do read (a[i,j]); writeln('ishodnaja matrica'); for i:=1 to m do begin for j:=1 to n do write(a[i,j]:6:2); writeln; end; for i:=1 to m do for j:=1 to n do begin buf:=a[1,j]; a[1,j]:=a[2,j]; a[2,j]:=buf; end; writeln('preobrazovannaja matrica'); begin for j:=1 to n do write(a[i,j]:6:2); writeln; end; end.

Пример 13.1 (Продолжение). 1) Организовать по программе ввод двумерного массива А(3,3) : ) Как описывается двумерный массив в программе? 3) В каком виде вводится задан- ный массив (строка или стол- бец)? 4) Объяснить работу програм- мы. 5) Как надо изменить програм- му, чтобы организовать ввод массива в один столбец. 6) Провести вычисление по программе. 7) Изменить порядок элементов в матрице и провести новое вычисление.

Пример 13.2 Поменять местами первый и второй столбцы матрицы А(3, 3). Program Pr_13_2; const m=3; n=3; var a:array[1..m,1..n] of real; i,j:integer; buf:real; begin writeln('vvedite massiv'); for i:=1 to m do for j:=1 to n do read (a[i,j]); writeln('ishodnaja matrica'); for i:=1 to m do begin for j:=1 to n do write(a[i,j]:6:2); writeln; end; for i:=1 to m do for j:=1 to n do begin buf:=a[i,1]; a[i,1]:=a[i,2]; a[i,2]:=buf; end; writeln('preobrazovannaja matrica'); for i:=1 to m do begin for j:=1 to n do write(a[i,j]:6:2); writeln; end; end.

Пример 13.2 (Продолжение). 1) Организовать по программе ввод двумерного массива А(3,3) : ) Как описывается двумерный массив в программе? 3) В каком виде вводится задан- ный массив (строка или стол- бец)? 4) Объяснить работу програм- мы. 5) Как надо изменить програм- му, чтобы организовать ввод массива в один столбец. 6) Провести вычисление по программе. 7) Изменить порядок элементов в матрице и провести новое вычисление.

Пример 13.3 Транспонировать матрицу А(3, 3). Program Pr_13_3; const m=3; n=3; var a:array[1..m,1..n] of real; i,j:integer; buf:real; begin writeln('vvedite massiv'); for i:=1 to m do for j:=1 to n do read (a[i,j]); writeln('ishodnaja matrica'); for i:=1 to m do begin for j:=1 to n do write(a[i,j]:6:2); writeln; end; for i:=1 to m do for j:=i+1 to n do begin buf:=a[i,j]; a[i,j]:=a[j,i]; a[j,i]:=buf; end; writeln('preobrazovannaja matrica'); for i:=1 to m do begin for j:=1 to n do write(a[i,j]:6:2); writeln; end; end.

Пример 13.3 (Продолжение). 1) Организовать по программе ввод двумерного массива А(3,3) : ) Как описывается двумерный массив в программе? 3) В каком виде вводится задан- ный массив (строка или стол- бец)? 4) Объяснить работу програм- мы. 5) Как надо изменить програм- му, чтобы организовать ввод массива в один столбец. 6) Провести вычисление по программе. 7) Изменить порядок элементов в матрице и провести новое вычисление.