Вниз
Скачать: CL | DM;

Матрица в памяти   Найти похожие ветки 

← →
xman   (2004-06-09 11:16) [0]

Ув. Мастера, помогоите, очень надо.
Мне нужно написать программу где содержится матрица соединений графа, которая нахождится в памяти

продолжение вопроса(не важно)
узнать количество ребер которые входят и выходят из данной вершины


← →
pasha_golub ©   (2004-06-09 11:26) [1]

А где она еще может находится просветите?


← →
Minori   (2004-06-09 11:29) [2]

Вести булевый двумерный массив с вершинами.
Навроде: если между вершинами A и B есть связь, то элемент массива [a,b] равен TRUE.

var nodes: array [1..100, 1..100] of boolean;
   n, i, num: integer;
begin
n:=1;
for i:=1 to 100 do
if (n<>i) and (nodes[n,i]) then num:=num+1;
end;

Приведенный код просчиает количество вершин, связанных с вершиной номер n (в данном случае n=1). num - количество.


← →
pasha_golub ©   (2004-06-09 11:31) [3]

Minori   (09.06.04 11:29) [2]
Не совсем Ваша правда. Обычно вводят численный массив, потому как часто в задачах фигурируют веса ребер (например, расстояния и т.д.)


← →
xman   (2004-06-09 11:34) [4]

мастера, у меня алгоритм вычисления вершин готов.
У меня в вопросе, надо чтобы матрица была в памяти (в какой неизвесно). Что вы мне можете посоветовать?


← →
Minori   (2004-06-09 11:35) [5]

2 pasha_golub
Ну, может это ему не совсем нужно, написано ребра пересчитать :) - пожалуйста.


← →
pasha_golub ©   (2004-06-09 12:03) [6]

Minori   (09.06.04 11:35) [5]
Я не спорю, но мы программисты должне думать о дальнейшей жизни кода и его портабельности? ;-)

Вот мои аргументы:
Булев тип все равно занимает один байт памяти, дык, давайте, на крайний случай, объявим массив of byte. И при значении ноль - нет прямой связи, в ином случае есть. Но при модификации кода мы уже будем иметь возможность задать вес ребра от 1 до 255. Но, это так, мысли вслух. :-))



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.036 c
14-1086021025
Adminus
2004-05-31 20:30
2004.06.20
Виртуальный сервер.


14-1086240174
Соловьев
2004-06-03 09:22
2004.06.20
Вопрос по MaxBill


8-1080971466
edicon
2004-04-03 09:51
2004.06.20
ScreenSaver


14-1085996934
Ertong
2004-05-31 13:48
2004.06.20
Памажите!! Internal Error SY576


1-1086703741
BlackLord2003
2004-06-08 18:09
2004.06.20
ClipText




   Наверх