foksov, вообще-то имеем тождество N == integer(cardinal(N)), где N - число типа integer. Т.е. исключить числа меньше нуля простым преобразованием туда сюда не получится.
------------ Дoбавленo в 23.14:
nesco, опередил...