ПОМОГИТЕ НАЙТИ ОШИБКУ! 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 <> 1) then writeln('YES') else writeln( 'NO') end.
Убери в 10-ой строке "else"