Напишите программу, которая вычисляет периметр прямоугольника по двум его сторонам. Заготовкаvar ?:integer;beginread(?);s:=???;write(???):?

program perimetr;

var

p, a, b: integer;

begin

write ('Введите сторону a: '); readln(a);

write ('Введите сторону b: '); readln(b);

p := 2*(a+b);

write ('Периметр прямоугольника со стороной a=', a ,' и b=', b ,' равен: ', p);

end.