Вопрос, который вызвал трудности

Составьте программу ,определяющую,является ли целое положительное число трехзначным.Очень срочно ,отмечу как лучщий ответ и поставлю отметку"спасибо"

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

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

Var
n:Integer;
Begin
 Read(n);
 if (n>=100) and (n<=999) then Writeln('YES')<br>  else Writeln('NO');
end.

Function if_3(input: integer): boolean; 
begin 
Result:=(input>99) AND (input<1000) </span>
end;