напишиет программу которая вычисляет площадь и периметр прямоугольника по длинам двух его сторон
Answers & Comments
D9tel
Var a,b:integer; begin write('Введите сторону a=');read(a); write('Введите сторону b=');read(b); writeln('Площадь прямоугольника=',a*b); writeln('Периметр прямоугольника=',2*(a+b)); end.
Answers & Comments
a,b:integer;
begin
write('Введите сторону a=');read(a);
write('Введите сторону b=');read(b);
writeln('Площадь прямоугольника=',a*b);
writeln('Периметр прямоугольника=',2*(a+b));
end.