Решите срочно очень надо плиз !!!!!!

Question

Решите срочно очень надо плиз !!!!!!

---

Answer 1

var a,b:integer;

begin

a:=12;

b:=5;

writeln('S = ', a*b);

a:=a+b;

writeln('P = ', 2*a);

end.