Обычная конкатенация строк.
var a,b,p:integer;
begin
readln(a,b);
p:=2*(a+b);
writeln('p = 2*(', a,' + ', b, ') = ', p);
end.
