Помогите написать программку, которая читает числа с 1го файла, переводит их

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программка не работает, обновите версию!

function DecToOctal(n:integer):string;
begin
  var r:string:='';
  while ngt;=8 do (r,n):=(n mod 8+r,n shr 3);
  Result:=n+r
end;

begin
  WriteAllText('bincod.txt',
      ReadAllText('codfio.txt').ToIntegers
      .Select(t-gt;DecToOctal(t)).JoinIntoString)
end.