Составить программу для вычисления по формуле P=2(a+b). (Паскаль)

Question

Составить программу для вычисления по формуле P=2(a+b). (Паскаль)

Answer 1

var
  a, b: real;

begin
  readln(a, b);
  writeln(2 * (a + b));
end.

Answer 2

Program pr; var a,b,p:integer; begin write('a='); readln(a); write('b='); readln(b); p:=2*(a+b); writeln('p=',p); end.