Program mimi;var a, b:integer;beginreadln (a);if 99 < a < thenwriteln('Неверно')elseif...

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.