Question

Помогите срочно!!!
Написать в тетради программу на языке Паскаль для
вычисления площади (S) и периметра (P) прямоугольника, если
известны стороны а и в.

Answer 1

var b,a,S,P:Integer;

begin

Writeln('Напишите длины сторон прямоугольника');

readln(a,b);

P:=2*(a+b);

S:= a*b;

Writeln('Периметр прямоугольника =',P);

Writeln('Площадь прямоугольника =',S);

end.