Поглощение типов
Числовые типы поглощают (значения) меньших числовых типов согласно следующей иерархии: LONGREAL >= REAL >= LONGINT >= INTEGER >= SHORTINT