во второй тур конкурса проходит обучающийся набравший от 85 до 100 баллов включительно. Ввести количество баллов и определить прошел ли он во второй тур (ввести ответ "подходит" или "не подходит")

var A:integer;beginReadln(A);If (A>=85) and (A<=100) thenWriteln('подходит')elseWriteln('Не подходит');end.