Pascal. Задача 2-2

Пользователь вводит число (дальность выстрела). Если число в интервале от 28 до 30, то вывести "Попал", иначе "Не попал".

Решение
var
  a : integer;
begin
  writeln('Введите число: ');
  readln(a);
  if (a >= 28) and (a <= 30) then writeln('Попал')
  else writeln('Не попал');
end.