logo
DM_shpory

1 Begin

2 for V do D [v] := A[s, v]; D [s] := 0;

3 T := V \ {s};

4 while T   do