График зависимости y=f(x)

[UnLimited]

Вообщем задача. Написать нужно на Паскале.

График зависимости y=f(x) приведен на рисунке. По данному х определить значение y.

Вот график

вот мой код, но мой препод послал меня "думать дальше", объяснив тем что формула не правильна.

program graf;
var x,y:real;
begin
writeln('Vvedite znachenie x:');
readln(x);
y:=abs(abs(x)-1);
writeln(y:9:2);
readln
end.