Тема: Как узнать знак числа?
Показать сообщение отдельно
  #6  
Старый 19.03.2011, 11:46
Assistant Assistant вне форума
Продвинутый
  
Регистрация: 20.02.2011
Адрес: там где правят идиоты
Сообщения: 603
Версия Delphi: 7
Репутация: выкл
По умолчанию
по-моему с 1го класса учат как определить какой знак у числа ))

или так
Код:
n := -1;
if Pos('-',IntToStr(n)) > 0 then
  ShowMessage('отрицательный');
__________________
взялся из неоткуда, ничего не прошу, помогаю просто так
ICQ: 593977748 - стучать в случае КРАЙНЕЙ необходимости, ну, или если вы со Ставрополя
Ответить с цитированием