Như tiêu đề, trong lúc học thì mình thấy người ta viết về cách in các phần tử của mảng trong mấy bài toán đệ quy liệt kê các hoán vị hay chỉnh hợp chập không lặp như sau( đã khai báo f ở trên)
procedure PrintResult; (*In ra tập con {x[1], x[2], ..., x[k]}*)
var i: Integer;
begin Write(f, '{');
for i := 1 to k - 1 do Write(f, x[i], ', ');
WriteLn(f, x[k], '}');
end;
Vậy cái trên có khác gì cách này
...for i:=1 to k do write(f,x[i],',');....
Bookmarks