Написать программу которая определяет принадлежит ли заданное число интервалу от 2 до 12.

// PascalABC.NET 3.2, сборка 1344 от 22.11.2016
begin
  var a:=ReadReal(Введите число);
  Write(a, );
  if (alt;2) or (agt;12) then Write(не );
  Writeln(принадлежит интервалу [2;12])
end.

Примеры
Введите число 3.18
3.18 принадлежит интервалу [2;12]

Введите число 16
16 не принадлежит интервалу [2;12]

Решение на фото. 20символоваоао пр аоуо