var
  min, max : Cardinal;
begin
  // Установка минимального и максимального значения этого типа данных
  min := Low(Cardinal);
  max := High(Cardinal);
  ShowMessage('Min значение cardinal = '+IntToStr(min));
  ShowMessage('Max значение cardinal = '+IntToStr(max));
end;