program ppp;
var
x: real;
begin
write('Введите x: ');
readln(x);
if x>=10 and x<=20 then writeln('Значение подходит') else writeln('Значение не подходит');
readln;
end.
Не тестила, но должно работать
