Составьте программу, которая определяет, принадлежит ли введенное число x интервалу (10,20) и выводит на экран соответствующее сообщение "принадлежит" либо "не принадлежит".

Program z1;
uses crt;
var x:integer;
begin
writeln('введите число');
readln(x);
if (x=>10) and (x<=20) then writeln('Принадлежит')
else writeln('Не принадлежит');
end.