Работа с большими числами

← →
dubolom © (2006-03-28 20:48) [0]

Имеется задача: создать калькулятор для работы с большими числами (целыми). Предполагаемое решение: числа хранить в массивах байтов. Один байт - одна цифра. Реализация сложения таких чисел:

asm
mov cx,len; //len - разрядность числа
lea di,a; //a,b - числа
lea si,b;
les bx,c; //c:=@a;
cc: mov al,es:[di];
adc dl,es:[si];
aaa;
mov es:[di],al;
inc di;
inc si;
loop cc;
adc es:[di],0;
end;
Но на строке mov al,es:[di] возникает исключение Access Violation, хотя адреса загружаются правильно. Почему оно возникает и как его обойти? Если нельзя, то существует ли решение этой задачи чисто на Delphi (без эмуляции вышеупомянутых ассемблерных команд)?

← →
Pavia © (2006-03-28 23:00) [1]

Ты программируешь в 32 разрадном режиме. Поэтому тебе нужно заменить.
DI на EDI
SI на ESI
и др. А также лучше работать не с Byte, а с DWord.
И конечно это можно реализовать без используя ассемблерные вставок.

← →
Rial (2006-03-29 01:23) [2]

Вот здесь можно найти кое-что для твоих целей (+-*/ для целых чисел любой длины):
http://www.rial578.narod.ru/bigzahlen.pas

Спасибо за ответы.

Работа с большими числами Найти похожие ветки