Найти алгоритм решения задачи и реализовать его с помощью оператора(операторов) if-then-else:
Машина задумывает два числа от 0 до 9. Игрок пытается их угадать, вводя свои два числа. Если они совпали (в любом сочетании) , то игрок выиграл.

Благодарю за помощь с:

uses crt;varx,y,a,b:integer;beginclrscr;while true do beginrandomize;x:=random(10);y:=random(10);write('Введите первое число=');read(a);write('Введите второе число=');read(b);writeln(x,' ',y);if ((a=x) and (b=y)) or ((a=y) and (b=x)) then beginwriteln('Вы угадали');endelse beginwriteln('Вы не угадали');end;end;end.