Дана программа. Введи данную программу в Паскаль.program perimetr_1;
var
a,b,p:real;
begin
a: = 9;
b: = 9;
p:=2*(a+b);
writeln('p=',p:5:0)
end.

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