Даны два числа A и B. Вам нужно вычислить их сумму 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.