let
    Source = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    addId = Table.AddIndexColumn(Source, "id", 100),
    defineRow = Table.AddColumn(addId, "row", each [id] - [Столбец1]),
    removeId = Table.RemoveColumns(defineRow, {"id"}),
    pivoted = Table.Pivot(Table.TransformColumnTypes(removeId, {{"Столбец1", type text}}, "ru-RU"), List.Distinct(Table.TransformColumnTypes(removeId, {{"Столбец1", type text}}, "ru-RU")[Столбец1]), "Столбец1", "значение Y"),
    removeRow = Table.RemoveColumns(pivoted, {"row"})
in
    removeRow

let
    Src = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    a = Src[значение Y], b = Src[Столбец1], c = List.Positions(a),
    d = (i)=> (if i=0 then true else b{i-1}>b{i}),
    e = (l,i)=> l&{List.Repeat({null}, b{i}-1)&{a{i}}},
    f = (l,i)=> l&List.Repeat({null}, b{i}-List.Count(l)-1),
    g = (l,i)=> List.RemoveLastN(l)&{f(List.Last(l),i)&{a{i}}},
    h = List.Accumulate(c,{},(l,i)=>if d(i) then e(l,i) else g(l,i)),
    i = Table.FromColumns(List.Zip(h))
in
    i

let
    Src = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    a = Src[значение Y], b = Src[Столбец1],

        //Массив чисел от 0 до кол-во строк таблицы -1
    с = List.Positions(a),

        //i- номер строки в исходной таблице, b - [Столбец1]
        //если i=0 или в i строке столбца Столбец1 значение> чем в i-1 строке, возвращает истину
        //определяет, что в результирующем массиве нужно добавить новый элемент
    d = (i)=>(if i=0 then true else b{i-1}>b{i}), 

        //l - результирующий массив, i - номер строки в исходной таблице, a - [значение Y], b - [Столбец1]
        //если d(i), то в массив l добавляется элемент - массив, состоящий из b{i}-1 null элементов и a{i}    
    e = (l,i)=> l & { List.Repeat({null}, b{i}-1) & {a{i}} },

        //l - массив (последний элемент результирующего массива), i - номер строки в исходной таблице, b - [Столбец1]
        //если количество элементов массива < b{i}-1, добавяляет в массив l недостающее количество null элементов 
    f = (l,i)=> l & List.Repeat({null}, b{i}-List.Count(l)-1), 

        //l - результирующий массив, i - номер строки в исходной таблице, a - [значение Y]
        //если not d(i), то в последний элемент массива l добавляет недостающее до b{i} количество null элементов и a{i}
    g = (l,i)=>List.RemoveLastN(l) & { f(List.Last(l),i) & {a{i}} },   

        //собирает данные из массивов a и b, используюя массив c в качестве итератора
    h = List.Accumulate(c,{},(l,i)=>if d(i) then e(l,i) else g(l,i)),
    i = Table.FromColumns(List.Zip(h))
in
    i

char O,o[];main(l){for(;~l;O||puts(o))O=(O[o]=
~(l=getchar())?4<(4^l>>5)?l:46:0)?-~O&printf("%02x ",l)*5:!O;}