Составьте программу для подсчета значений функции y=|x|+|x+1|, при любом значении x. Помогите, пожалуйста
Program qq; var y,x : real; begin read (x); y := abs(x) + abs(x + 1); writeln(y); end.