写出下面算法中带标号语句的频度。 TYPE ar=ARRAY[1..n] OF datatype; PROCEDURE perm ( a: ar; k, n: integer); VAR x: datatype; i:integer; BEGIN (1)IF k=n THEN BEGIN (2)FOR i:=1 TO n DO (3)write (a[i]); writeln; END ELSE BEGIN (4) FOR i:=k TO n DO (5)a[i]:=a[i]+i*i; (6) perm (a, k+1, n); END; END; 设k的初值等于1。