Question

program mimi;
var a, b:integer;
begin
readln (a);
if 99 < a < then
writeln('Неверно')
else
if a>999 then
writeln('Неверно')
else
writen('Верно')
end.


Выдаёт: pas(5) : Ожидался идентификатор
Что не так?

Answer 1

Переписал без ошибок
var a, b:integer;
begin
readln (a);
if 99 < a then writeln('Неверно')
 else if a>999 then writeln('Неверно')
  else writeln('Верно')
end.