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

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