Данны две стороны прямоугольника. Вычислить перимитер и площадь. Записать ответ при...

Question

Данны две стороны прямоугольника. Вычислить перимитер и площадь. Записать ответ при а:=12, b:=15.

Answer 1

Var a, b : integer;
begin
a := 12;
b := 15;
writeln('Площадь прямоугольника = ', a * b);
writeln('Периметр прямоугольника = ', 2 * a + 2 * b);
end;