Exited with exitcode=217 при работе с файлами - Free Pascal (614)

Формулировка задачи:

решал простейшие задачки на составление формул: ввод данных, расчёт, вывод. работает без проблем.

                    Листинг программы
                
 
                        
                          
                    
uses crt,math;
const e=2.7;
Var a,b:integer;
    x,y:real;
Begin
  read(a,b);
  x:=(power(power(e,-(abs(a))),0.2)+cos(a*a*a*a-b))/(a*b);
  y:=(cos(a*a*a*a-b)+arctan(a))/(b+x);
  writeLn(x:4:2);
  writeLn(y:4:2);
  readkey;
End.

теперь появилась необходимость эту же прогу записать с помощью использования файлов:

                    Листинг программы
                
 
                        
                          
                    
uses crt,math;
const e=2.7;
Var a,b:integer;
      x,y:real;
      input,output:text;
Begin
  assign(input,'input.txt');
  reset(input);
  assign(output,'output.txt');
  rewrite(output);
  read(a,b);
  close(input);
  x:=(power(power(e,-(abs(a))),0.2)+cos(a*a*a*a-b))/(a*b);
  y:=(cos(a*a*a*a-b)+arctan(a))/(b+x);
  writeLn(x:4:2);
  writeLn(y:4:2);
  close(output);
  readkey;
End.

и вот тут при компиляции всё нормально, а после выполнения команды Run выскакивает треклятая ошибка

exited with exitcode=217

светлые умы, подскажите, что не так?

Решение задачи: «Exited with exitcode=217 при работе с файлами»

Листинг программы

uses math;
const e=2.7;
Var a,b:integer;
      x,y:real;
    //  input,output:text;
Begin
  assign(input,'input.txt');
  reset(input);
  assign(output,'output.txt');
  rewrite(output);
  read(a,b);
  close(input);
  x:=a+b;
  y:=a*b;
  writeLn(x:4:2);
  writeLn(y:4:2);
  close(output);
End.

Объяснение кода листинга программы

Используется единица измерения числа e со значением 2.7.
Объявлены целочисленные переменные a и b.
Объявлены вещественные переменные x и y.
Переменная input инициализируется как файловый ввод, а переменная output как файловый вывод.
Файл input.txt открывается для чтения, а файл output.txt открывается для записи.
Читаются значения переменных a и b из файла input.
Закрывается файл input.
Переменная x инициализируется как сумма a и b.
Переменная y инициализируется как произведение a и b.
Значение переменной x выводится на экран с форматированием, где первые 4 позиции занимают цифры числа, а следующие 2 позиции - пробелы.
Значение переменной y выводится на экран с форматированием, где первые 4 позиции занимают цифры числа, а следующие 2 позиции - пробелы.
Файл output.txt закрывается.
Выполняется операция выхода из программы.