{* Задача227 *}

REM basic

' Игра "Рулетка". Два игрока вводят числа а и b в диапазоне от 1 до 36.
' Программа генерирует положительное целое число в этом же диапазоне
' и проверяет равенство. Победителем может быть только один игрок.


CLS
INPUT "Число игрока №1 ", a
INPUT "Число игрока №2 ", b

rez = CInt(RND * 35 + 1)
PRINT "Результат"; rez
If a = rez Xor b = rez Then PRINT "Выигрышная ставка есть" Else PRINT "Никто не выиграл"
End