Двумерный массив. Поменять первую и последнюю строки между собой

@Neutral · Регистрация: 01.06.2010

Студворк — интернет-сервис помощи студентам

В маирице размером n на m(1<n, m,10) (ввод n, m и матрицы с клавиатуры) поменять первую и последнюю строки между собой. Вывести исходную и получившуюся матрицы. Использовать подпрограммы.

@STGE · 02.06.2010, 01:18

Pascal

const n=100; m=200;
type mas=array[1..n,1..m] of integer;
...
procedure obmen (d: mas; k,l: word; var f: mas);
var i,j: byte; pr: integer;
begin
for j:=1 to l do
begin
pr:=d[1,j];
d[1,j]:=d[k,j];
d[k,j]:=pr;
end;
for i:=1 to k do
for j:=1 to l do
f[i,j]:=d[i,j];
end;
...

@Neutral 0 / 0 / 0 Регистрация: 01.06.2010 Сообщений: 7
		1
	Двумерный массив. Поменять первую и последнюю строки между собой 02.06.2010, 00:14. Показов 1706. Ответов 1 Метки нет (Все метки) В маирице размером n на m(1<n, m,10) (ввод n, m и матрицы с клавиатуры) поменять первую и последнюю строки между собой. Вывести исходную и получившуюся матрицы. Использовать подпрограммы. 0

Опции темы

Двумерный массив. Поменять первую и последнюю строки между собой

Решение