Очень надо, помогите пожалуйста. Задача по информатике.
Вычислить значение функции Y(x задается с клавиатуры)
Y равен системе: x, при x<-5 
                           |x+2|, -5<x<5
                           cosx, x>5

varx,y:real;Beginwriteln('Введи значение аргумента х: ');readln(x);if x<-5 then y:=x;if x>-5 and x<5 then y:=abs(x+2);if x>5 then y:=cos(x);writeln('значение функции в точке равно ',y);readln;End.