Написать формулу используя логическую функцию если

Var

y,x: integer;

begin

writeln('Ведите ваше число:');

read(x) ;

if x > 2 then

writeln('Результат y =: ', x+3)

Else

if x <=- 2 then

writeln('Результат y =: ', 1 div x);

Readln ;

end.