Question

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

Answer 1

var b,a,S:Integer;

begin

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

readln(a,b);

S:= a*b;

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

end.