Записать программу ** Языке Паскаль

Question

Записать программу на Языке Паскаль

---

Answer 1

Var a: integer;begin    writeln ('Введите кол-во балов');    readln (a);    if (a >= 85) and (a <= 100) then    writeln ('подходит')    else    writeln ('не подходит');end.<hr>