Даны два числа A и B. Для вас необходимо вычислить их сумму

Как величается файл ввода и вывода?

Var
  input, output : text;
  A, B : integer;
begin
  assign(input, 'input.txt');   //Ассоциируем переменные с файлами
  assign(output, 'output.txt');

  reset(input);      //Раскрываем файл для чтения
  rewrite(output);  //Раскрываем файл для записи

  readln(input, A);
  readln(input, B);
  writeln(output, A + B);

  close(input);   //Закрываем файлы
  close(output);
end.