Свой тип данных в Delphi - сверх длинные числа - хранение в переменных размером до 1 MB

[KLaiM]

А если конкретно, то мне необходим целочисленный тип данных, желатьльно чтобы значение могло быть и отрицательным, и положительным. Но самое главное - переменная этого типа должна занимать в памяти 1 Мб (это в идиале). Ну или 512 Кб на худой конец.
Как мне создать такой тип?

[JTG]

O_o

А в переменную, которая занимает в памяти 512кб, влезет число 0 .. 256^524288, это ж все компы мира такое число не прожуют наверно. Не бывает такого типа, и не будет

Может имеется ввиду указатель? Или массив целых чисел?

[Jeni]

Сообщение от KLaiM

...переменная этого типа должна занимать в памяти 1 Мб

Тип такой создать можно, например:
type
TVeryVeryLongType = packed array[0..262143] of Integer; // или of LongInt
var
V1, V2, V3: TVeryVeryLongType;

Вот только для обработки таких переменных, как "единого целого", а не как отдельных элементов массива, придется писать специальные процедуры. Обычно это оформляется как отдельный класс.
Но проще поискать уже готовые специальные библиотеки для работы с длинными числами (хотя я немного сомневаюсь, смогут они работать с такими длинннннннными).

[VVM]

Можно попытаться использовать тип String для оперативного хранения и спользования сверхдлинных чисел. Но, как правильно сказал товарищ Jeni, необходимы спец. процедуры для обработки.

[KLaiM]

Jeni,
И как мне, например, поделить на 4 (к примеру) первый элемент этого массива-оченьоченьоченьбольшогочисла?

[Jeni]

Я же говорил, для этого потребуется использовать специальные и не слишком простые процедуры. Могу только дать ссылку (делюсь тем, что сам недавно получил):
http://wmate.ru/ebooks/cat54/

Там есть книга в формате *.pdf "Программирование в алгоритмах", автор Окулов, в ней рассматривается работа с длинными числами.
Если нужны готовые библиотеки - стоит почитать на том-же сайте или поискать в инете.

[KLaiM]

Ребята, выручайте!
Каким образо мне считать N первых битов из файла и записать их в String?

P.S. Jeni, посмотрел книгу и понял, что рано мне ещё такую литературу читать =)

[Квэнди]

http://narod.yandex.ru/cgi-bin/yandm...0=635255200&p=

[zetrix]

Каким образо мне считать N первых битов из файла и записать их в String?

А нельзя было сразу написать то, что вам надо?

Сколько N? 5,10, 1000000?

var buf:array[1..1024*1024]of byte;
count:longint;

...
BlockRead(f,buf,count);

Считали из файла 1 метр, а потом уже побитовые операции. Что такое count? - читайте справку к делфе.

P.S.: и длинные числа тут вовсе не причём.

[KLaiM]

zetrix, благодарю.
P.S. Причем. Мне надо было представить информацию (1 Мб) в виде числа. Потом забил на это дело и решил брать по 4 байта. Чтоб в Cardinal помещалось.