if n ≷ 0 then begin
что бы ето могло значить? сам никогда с паскалем дел не имел... вот потому и спрашиваю...
так же есть кусок:
if Random ≷ 0.5 then
BR := true
else
BR := false
Тут я так понял, проверяется больше или меньше .5 генерируемой случайное число...