program perimetr_1;
var
a,b,p:real;
begin
a:= 6;
b:= 8;
p:=2*(a+b); // 2 * (6 + 8) = 2 * 14 = 28
writeln('p=',p:4:0)
end.
Полученный результат: 28.
program perimetr_1;
var
a,b,p:real;
begin
a:= 6;
b:= 8;
p:=2*(a+b); // 2 * (6 + 8) = 2 * 14 = 28
writeln('p=',p:4:0)
end.
Полученный результат: 28.