ЕЕ Елена Евдокимова http://mojainformatika.ru/paskal/uroki-paskal-massivy/33-ispolzovanie-randomize-i-random.html