Тема: Арифметические операции... и проблемы с ними!
Показать сообщение отдельно
  #5  
Старый 24.05.2012, 13:31
Аватар для AND_REY
AND_REY AND_REY вне форума
Активный
  
Регистрация: 31.03.2009
Адрес: Украина, г.Днепропетровск
Сообщения: 324
Версия Delphi: Delphi7
Репутация: 3877
По умолчанию
Замени StrToInt на StrToFloat там где а, b и тип в разделе var с, bd: integer остальное Real.
Нужно внимательней выбирать тип целый, дробный ...
__________________
If end Then begin;
Ответить с цитированием