ПОМОГИТЕ Отыскать ОШИБКУ!Program A1;var a,b : integer;beginreadln(a,b);if a=1 then

ПОМОГИТЕ Отыскать ОШИБКУ!
Program A1;
var a,b : integer;
begin
readln(a,b);
if a=1 then
if a=b then
writeln ('YES')
else
writeln ('NO');
else if (b lt;gt; 1)
then writeln('YES')
else
writeln( 'NO')
end.

Задать свой вопрос
1 ответ
Убери в 10-ой строке "else"
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт