Помогите вычислить функции по информатике фото прикреплю

С++
includelt;iostreamgt;
includelt;cmathgt;

int y(int x)
  if(xlt;-2)
    return (abs(x)+2);
  else if(x gt;= -2 amp;amp; xlt;= 2)
    return 1;
  else
    return (x+1);
 


using namespace std;
int main()
  int x;
  cingt;gt;x;
  coutlt;lt;y(x)lt;lt;endl;
  return 0;


Паскаль

Program pr;
uses crt;
var x :integer;

fubction y(x: integer) int a begin
if xlt;-2 then
a:= абс(x)+2;
else if (xgt;=-2) and (xlt;=2) then
a:= 1;
else a:= x+1;
end;

begin
readln(x);
whiteln(y(x));
end;