program saddasdasdasd;
type vect=array[1..1000]of integer;
     mat=array[1..1000,1..1000]of integer;
const infinit=maxint;
var d,pre,m,dr,w:vect;c:mat;
    n,nr_m,cost,i,j,k,kk,x,y,start,dmin,lg,vfmin:integer;
    f,g:text;

procedure initializare;
var muchii:longint;
begin
readln(f,n,muchii); start:=1;
for i:=1 to n do
 for j:=1 to n do begin c[i,j]:=infinit; c[j,i]:=infinit;end;
for i:=1 to muchii do begin
                      readln(f,x,y,cost);
                      c[x,y]:=cost;c[y,x]:=cost;
                      end;
for i:=1 to n do begin d[i]:=c[start,i]; pre[i]:=start;end;
m[start]:=1;pre[start]:=0;
end;

procedure asfalteaza;
begin
for j:=1 to n do
   begin
   dmin:=infinit;
   for i:=1 to n do
     if (m[i]=0)and(dmin>d[i]) then begin
                                    dmin:=d[i];
                                    vfmin:=i;
                                    end;
   m[vfmin]:=1;
   for i:=1 to n do
    if (m[i]=0)and(d[i]>dmin+c[vfmin,i]) then
                                             begin
                                             pre[i]:=vfmin;
                                             d[i]:=dmin+c[vfmin,i];
                                             end;
   end;
end;

procedure afiseaza;
var i,j,lg:longint;
    dr:vect;
begin
for i:=1 to n do
if i<>start then write(g,d[i],' ');
end;

begin
assign(f,'dijkstra.in');reset(f);
assign(g,'dijkstra.out');rewrite(g);
initializare;
asfalteaza;
afiseaza;
close(f);close(g);
end.