计算复杂性练习

我正在阅读AHO、Hopcroft和Ullman的“数据结构和算法”,我对练习1.12b感到困惑:

这个Pascal过程的计算复杂度(用大O符号表示)是多少?

procedure mysterious( n: integer );
    var
        i, j, k: integer;
    begin
        for i := 1 to n - 1 do
             for j := i + 1 to n do
                 for k := 1 to j do
                    {mysterious statement of O(1)}
    end

你能帮帮我吗?

谢谢!