Показать сообщение отдельно
  #1  
Старый 18.01.2013, 12:35
crash94 crash94 вне форума
Прохожий
 
Регистрация: 08.07.2009
Адрес: Архангельск
Сообщения: 26
Версия Delphi: 7
Репутация: 10
По умолчанию Найти среднее между 2 числами

Здравствуйте формучане..
Имеется 60 чисел от 0 до 6000000. Пытаюсь сделать, чтобы когда пользователь вводит число в edit, то программа искала среднее между 2 числами.К примеру

Введено в edit число 8765
Ведется поиск. Если число вошло в диапозон edit > '8000' и edit < '10000' то выполнялось любое действие...

Пытался сделать так:
Цитата:
if ( Edit1.Text >= '0' ) and ( Edit1.Text < '700' ) then
begin
//code
end
else
if ( Edit1.Text >= '700' ) and ( Edit1.Text < '1400' ) then
begin
//code
end;

но если ввести число 800 к примеру, софт не срабатывает
Ответить с цитированием