Написать программу на языке паскаль. даны стороны прямоугольника a и b. найти его периметр P=2*(a+b)
Uses crt; var a, b, S, P:integer; begin write('a='); readln(a); write('b='); readln(b); S:=a*b; P:=2*(a+b); write('S=',S,' ','P=',P); end.