Question

Делать через freepascal или pascal abc! а + b даны целые числа a и b. необходимо найти сумму этих чисел. формат входных данных во входном файле в единственной строке записаны a и b, разделённые пробелом. формат выходных данных в выходной файл выведите число, являющееся ответом.

Answer 1

//Pascal ввод с клавиатуры
var A, B: integer;
begin
write('Введите A, B = '); readln(A, B);
writeln(A+B);
end.

//Pascal ввод/вывод через текстовый файл
//input.txt должен находиться в папке с программой
var
  A, B: integer;
  t1, t2: text;
begin
  assign(t1, 'input.txt');
  assign(t2, 'output.txt');
  reset(t1);
  readln(t1, A, B);
  close(t1);
  rewrite(t2);
  write(t2, A+B);
  close(t2);
end.