Question

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

Answer 1

var

 a, b, s, p: real;

begin

 writeln('Введите длину прямоугольника:');

 read(a);

 writeln('Введите ширину прямоугольника:');

 read(b);

 s := a * b;

 p := 2 * (a + b);

 writeln('Площадь прямоугольника = ', p, #10, 'Периметр прямоугольника = ', s);

end.