Даны 2 двузначных числа, если 1 цифра 1 числа больше 1 цифры 2 числа и 2 ц3ифра 1 числа меньше 2 цифры 2 числа, то вывсти на экран «да» иначе «нет»

var a,b:integer; begin writeln('Введите два числа через пробел'); read(a,b); if (a div 10>b div 10) and (a mod 10<b mod 10) then writeln('Да') else writeln('Нет'); end.