Ответ:

Если язык Pascal, то :

var

a : real;

begin

readln(a);

if (a > -5) and (a < 3) then writeln('Принадлежит')

else writeln('Не принадлежит');

end.

var

program interval;

x : real;

begin

read(x);

if (x>=-5) and (x<=3) then writeln('Да')

else writeln('Нет');

end.