В среде программирования Pascal набери программу:

program perimetr_1;

var

a,b,p:real;

begin

a:= 9;

b:= 7;

p:=2*(a+b);

writeln('p=',p:4:0)

end.

Полученный результат: \(\square = \square\).