Показать сообщение отдельно
  #9  
Старый 21.07.2019, 18:57
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Значит что-то не так.
1. Сделай все переменные, включая массив A, локальным (если возможно).
2. Массив A должен быть именно динамическим (проверь его описание).
3. Проверь типы данных. В моем примере они все Integer.
4. Убедись, что никакой другой код "не встревает" во время вычисления (не сохраняет в эти переменные ничего).

Косяк явно у тебя, я проверил свой код и он работает абсолютно правильно.
Ответить с цитированием