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