Помогите пожалуйста! Нужно сделать это в паскале: Найти периметр прямоугольника со...

Question

Помогите пожалуйста! Нужно сделать это в паскале: Найти периметр прямоугольника со сторонами a и в

Answer 1

Program perimetr;
Var a,b,P:integer;
begin
writeln('введите значения a и b');
read(a,b);
P:=2*(a+b);
write(P);
end.