Ошибки в этой программе:

В процедуре summ параметры plus и minus должны быть объявлены как var, чтобы их значения могли быть изменены и переданы обратно в основную программу.Внутри процедуры summ неправильно вычисляется разность чисел. Вместо этого нужно было использовать вычитание (minus:=a-b;).В основной программе ошибочно дважды считывается значение переменной b, вместо того, чтобы считывать значение переменных a и b.В вызове функции summ передается неверное количество параметров и неправильное их объединение в строку.

Более корректный вариант программы:

var a, b: integer;
procedure summ(var plus, minus: integer);
begin
plus := a + b;
minus := a - b;
writeln('Сумма: ', plus);
writeln('Разность: ', minus);
end;
begin
writeln('Введите первое число:');
readln(a);
writeln('Введите второе число:');
readln(b);
summ(a, b);
end.