Program perime; var a,b,p:integer; begin write('введите длину и ширину'); read(a,b);...

Question

Program perime; var a,b,p:integer; begin write('введите длину и ширину'); read(a,b); P:=(a+b)*2; writeln('p=',p); end. Изменить последнюю строчку чтобы было P=2*(3+4)=14

Answer 1

Program perimetr;

var a,b,P: integer;

begin

writeln('Введите длину и ширину: ');

readln(a,b);

P:=(a+b)*2;

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

end.