Паскаль программу написать
Введите длину и ширину прямоугольника ( два целых положительных числа). Вычислить площадь и периметр прямоугольника

var a, b:real;begin  readln(a, b);  writeln('Площадь равна ', a*b);  writeln('Периметр равен ', 2*(a + b));end.