Pascal/Turbo Pascal - Permutaciones

Buenas compañer@s!

Estoy realizando un programilla en Turbo Pascal que lo que hace es crear todas las permutaciones posibles aut contiene un array. Lo realizo con un porrón de for y me escribe en pantalla cada una de las permutaciones. El caso es que no sé como debo hacer para grabar todas las permutaciones creadas en un txt ya que al visualizarlas mediante un writeln luego no consigo que según van apareciendo se me guarden en alguna variable pues no sé de qué tipio ha de ser.

Si me podéis dar alguna solución para pasar estos datos a un txt os lo agradecería.


program Permut;

uses wincrt;

const
matriz: array[0..15] of Char = '0123456789ABCDEF';

var
uno,dos,tres,cuatro,cinco,seis,siete,ocho:integer;
nueve,diez,once,doce,trece,catorce,quince,dieciseis:integer;

begin

for uno:=0 to 15 do
for dos:=0 to 15 do
for tres:=0 to 15 do
for cuatro:=0 to 15 do
for cinco:=0 to 15 do
for seis:=0 to 15 do
for siete:=0 to 15 do
for ocho:=0 to 15 do
for nueve:=0 to 15 do
for diez:=0 to 15 do
for once:=0 to 15 do
for doce:=0 to 15 do
for trece:=0 to 15 do
for catorce:=0 to 15 do
for quince:=0 to 15 do
for dieciseis:=0 to 15 do
writeln(matriz[uno],'',matriz[dos],'',matriz[tres],'',matriz[cuatro],'',matriz[cinco]
,'',matriz[seis],'',matriz[siete],'',matriz[ocho],'',matriz[nueve],'',matriz[diez],'',matriz[once],'',matriz[doce]
,'',matriz[trece],'',matriz[catorce],'',matriz[quince],'',matriz[dieciseis]);

end.