Question

Напишите, пожалуйста программу для задачи о прямоугольнике: Даны 2 стороны прямоугольника a и b. Найти его периметр и площадь. (Язык программирования Pascal).

Answer 1

var
a,b,p,s:real;
begin
writeln('введите стороны прямоугольника');
read(a,b);
s:=a*b;
p:=2*(a+b);
writeln('площадь прямоугольника равна: ',s);
writeln('периметр прямоугольника равен: ',p)
end.