Даны стороны прямоугольника a и b.Составьте программу,которая вычисляет его площадь Sи периметр Р и выводит результат на экран СРОЧНООО!
Program n1; var a,b: real; begin readln(a,b); writeln('S=',a*b); write('P=',(a+b)*2); end.