Не могу сложит два числа

[RAVAL))]

Помогите написатьт программу:
Дано:
число А(до 1000 цифр) и
число В(до 1000 цифр) нужно их сложить.

[Карась]

Вам же уже сказали по какому алгоритму это делать......

Алгоритм основывается на двух массиве.
Числа - строки.
1. Берём 1 число. Записываем его по цифре в массив. Запись начинать в конец массива.
2. Дальше начинаем делить второе число и прибавлять с числами в массиве....

Вот например я когдато писал перемножение большого числа (до 100 знаков) на однозначное.

Var Num, Num2 : String;
    i, v, Len : Integer;
    Temr : array [0..100] of Integer;

Begin
Write ('Vvedite bolshoe 4islo  ');
Readln(Num);
Readln(num2);

Len := Length(Num);

For i := 0 To (Len - 1) Do
  Begin
   v := StrToInt(Num[Len - i]) * StrToInt(Num2);
   Temr[i] := Temr[i] + v mod 10;
   Temr[i + 1] := Temr[i + 1] + v div 10;
  End;

For i := 1 To Len Do
  Write(IntToStr(Temr[Len - i]));

Readln;
End.

Писалось от балды, результат проверялся перемножением в уме первых пару цифр.... 
Вроде верно считает....

[RAVAL))]

мне само решение нужно

[Карась]

Алгоритм я показал, пример дал.......
Что ещё надо, не понятно....

Кто придумал что число будет до 1000 знаков?
Косолька Делфи например не даст ввести больше 254.....

[RAVAL))]

значит ты не решал настоящих задач!!!

[Карась]

Сообщение от RAVAL))

значит ты не решал настоящих задач!!!

Конечно не решал. Я только трендеть умею.

[RAVAL))]

Я реальной помощи попросил, а ты ...

[Olympian]

RAVAL))
Ты попросил вначале помочь тебе с алгоритмом - я тебе написал его.

Потом ты попросил написать тебе программу - Карась тебе написал ее.Примерно. Будь добр - подумай теперь сам

Карась
Ты не прав, про "Кто даст ввести 1000 символов". Возможно(и я более чем уверен) - чтение из файла нужно.

[Карась]

Я имел вввиду что если вводить строку прям в прогу(с клавы), то консолька делфи разрешит это сделать только до 254 знака....
Если через фаил то да....

[Olympian]

Да, с консолью согласен...Да и нужно быть слегка сумасшедшим, чтобы вводить с консоль два 254 значных числа, и потом вручную проверять сумму=)