FreePascal.ru

Это просто. Пример запуска программы:

$ std_stream_test test.pas output.txt trace.txt
Код:


var inf, outf, dbgf: text;

begin
(* Открыть входной файл на чтение *)
Assign(inf, ParamStr(1));
Reset(inf);

(* Если запрошено - перенаправить стандартный вывод *)
if ParamCount ...