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

Question

Элоиза

26 сентября, 12:59

+5

Ответы (1)

Знаешь ответ?

Глорибза · Answer 1

Var a, b:integer;

begin

writeln ('Введите два числа через пробел');

read (a, b);

if (a div 10>b div 10) and (a mod 10
else writeln ('Нет');

end.