Question

Напишите программу,которая вычисляет площадь прямоугольника по двум его сторонам.

Answer 1

Var x,y:real;

Begin

   write('Введите x,y: ');readln(x,y);

   writeln('P = ',2*(x+y):0:2);

  end.