Написать процедуру составления списка смежных вершин по заданной матрице смежности

@QuickPro · Регистрация: 11.04.2014

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

Написать процедуру составления списка смежных вершин по заданной матрице смежности.

@bormant · 02.06.2015, 15:53

Pascal

const
  n=5;
type
  TMatr = array [1..n,1..n] of Integer;
 
procedure vList(const m: TMatr);
var i, j: Integer;
begin
  for i:=1 to n do for j:=1 to n do if m[i,j]<>0 then Write(' (',i,',',j,')'); WriteLn;
end;

@QuickPro 4 / 4 / 3 Регистрация: 11.04.2014 Сообщений: 173
		1
	Написать процедуру составления списка смежных вершин по заданной матрице смежности 02.06.2015, 13:48. Показов 1664. Ответов 1 Метки нет (Все метки) Написать процедуру составления списка смежных вершин по заданной матрице смежности. 0

	02.06.2015, 15:53

Написать процедуру составления списка смежных вершин по заданной матрице смежности

Решение