Pascal Для данного целого x найти значение следующей функции f, принимающей значение целого типа: f(x) = 2·x, если x<-2 или x>2, -3·x, в противном случае
Var: x, y: integer; begin readln (x); If x<-2 then<br>y:=2*x; If x>2 then y:=-3*x; writeln (y); end.