var f1,f2:text;
    i,j,n,ac:longint;
    a:array[0..210,0..210] of integer;
begin
        assign(f1,'oras.in');
        reset(f1);
        assign(f2,'oras.out');
        rewrite(f2);
        read(f1,n);
        for i:=1 to n do
        begin
                ac:=1;
                for j:=i+1 to n do
                begin
                        a[i,j]:=ac;
                        ac:=ac xor 1;
                        a[j,i]:=ac;
                end;
        end;
        for i:=1 to n do
        begin
                for j:=1 to n-1 do
                        write(f2,a[i,j]);
                writeln(f2,a[i,n]);
        end;
        close(f1);
        close(f2);
end.