Program mimi;var a, b:integer;beginreadln (a);if 99 меньше a меньше thenwriteln('Неверно')elseif a больше 999 thenwriteln('Неверно')elsewriten('Верно')end.Выдаёт: pas(5) : Ожидался идентификаторЧто не так?
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) : Ожидался идентификатор
Что не так?
Ответ(ы) на вопрос:
Переписал без ошибок
var a, b:integer;
begin
readln (a);
if 99 < a then writeln('Неверно')
else if a>999 then writeln('Неверно')
else writeln('Верно')
end.
Не нашли ответ?
Похожие вопросы