function randomBoolean(first,second:integer): boolean; begin randomBoolean:=random(first+second) <first; end;