Даны два числа 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.

австрия - вена

бельгия- брюссель

великобритания-лондон

германия-берлин

ирландия-дублин