Бинарные последовательности

[Neonch]

Два двоичных числа а и б задаются как бинарные последовательности в форме нультерминальных строк с неопределённой заранее длиной. Требуется получить результаты 5-ти арифметических действий над целыми числами. а+b
а-b
а*b
а div b
a mod b
Вот, что у меня получилось, говорят не правильно, подскажите как нужно записывать эти бинарные последовательности
#Program st;
var a,b,c,s,v,u,d:integer;
begin
writeln('wwedite a');
readln(a);
writeln('wwedite b');
readln(b);
c:=a-b;
s:=a*b;
v:=a div b;
u:=a mod b;
writeln('c=', c);
writeln('s=', s);
writeln('v=',v);
writeln('u=', u);
end.#

[Neonch]

Может кто знает как задать эти бинарные последовательности.

[Mad_Cat]

Может кто знает как задать эти бинарные последовательности.

задать как array[1..1000] of byte

[Neonch]

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

задать как array[1..1000] of byte

Кто-нибудь вообще знает как решить эту задачу?

[Mad_Cat]

я знаю)
написать сложение и вычитание(двоичных чисел) все остальное реализовать с их помощью)

[Neonch]

А вот я не знаю, напишите как, а то вторую неделю мучаюсь с этой задачей.