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

program perimetr_1;

var

a,b,p:real;

begin

a:= 6;

b:= 8;

p:=2*(a+b);

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

end.

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