var f1,f2:text;
    i,n,m,st,mx:longint;
    a,b,s,sm:array[0..100] of longint;

procedure perm(k:longint);
var i,j,ok:longint;
begin
        if k>n then
        begin
                ok:=1;
                for i:=1 to m do
                begin
                        st:=0;
                        for j:=a[i] to b[i] do
                                st:=st+s[j];
                        if st<>sm[i] then
                                ok:=0;
                end;
                if ok=1 then
                begin
                        for i:=1 to n do
                                write(f2,s[i],' ');
                        close(f1);
                        close(f2);
                        halt;
                end;
                exit;
        end;
        for i:=0 to mx do
        begin
                s[k]:=i;
                perm(k+1);
        end;
end;

begin
        assign(f1,'reconst.in');
        reset(f1);
        assign(f2,'reconst.out');
        rewrite(f2);
        read(f1,n,m);
        mx:=7;
        for i:=1 to m do
                read(f1,a[i],b[i],sm[i]);
        perm(1);
        close(f1);
        close(f2);
end.