Показать сообщение отдельно
Старый 23.01.2005, 21:04   #7   
Инженер
 
Аватар для XPEH_BAM
 
Сообщений: 1,353
Регистрация: 17.09.2004
Возраст: 43
Записей в дневнике: 11

XPEH_BAM вне форума Не в сети
BOBA Это было написано за 15 секунд, так что не жалуйся. Там подпись есть насчёт мелочей всяких. Я же не курсяк на заказ делаю. Так исправляйте сами.
---
if (a[i]<0) and (abs(a[i])>max) then max:=a[i];
---
Так сойдёт?
  Ответить с цитированием