Question

Вычислить периметр и площадь прямоугольника, если заданы его стороны.
Нужно написать программу для этой задачи (Pascal)

Answer 1

var
  a,b,p,s:integer;
begin
  writeln('Введите a');
  readln(a);
  writeln('Введите b');
  readln(b);
  writeln('Периметр: ',2*(a+b));
  writeln('Площадь: ',a*b);   
end.

Answer 2

спасибо!