Напишите программу определяющую принадлежит ли в веденное число игровому кубику на языке паскаль надо

Считаем, что кубик имеет 6 граней, тогда число должно быть >=1 и <=6

//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
  var x:=ReadInteger();
  if (x >=1) and (x<=6) then println('Принадлежит')
  else println('Не принадлежит');
end.