Foro de elhacker.net

Hola Necesito ayuda, mi Docente me pidió que toda esta codificación lo pase a Delphi y no sé cómo... supuestamente es suma binaria en vector.
en otras palabras introcuducimos número decimal y que nos devuelva el resultado a binario.
también tengo que hacer Resta Binaria, Multiplicación binaria, División Binaria.

Le agrege unas aclaraciones para hacerlo mas claro.
Program COMPLEMENTOA2;
USES crt;
TYPE
    numero= string[32];
    vector= array[1..32]of byte;
VAR
   N:numero;
   bits,D,f,h,i,j:longint;
   g:integer;{es solo pasa el posible error de la funcion VAL}
   V:vector;
Begin
     clrscr;
     D:=0;
     i:=0;
     writeln('ingrese el numero binario');
     readln(N);
     writeln('ingrese cantidad de bits a trabajar');
     readln(bits); {para definir el tope del vector}
     D:= length(N);  {cantidad de digitos ingresados}
     If D<bits then
        begin
           i:=bits;
             while d>=0 do
                begin
                 val(n[d],f,g);
                 V:=f;   {con esto lo que hago es agregar los ceros
                             para completar los bits (8,16,32)}
                 D:=D-1;
                 i:=i-1;
                end;
             for j:=1 to bits do
                 begin
                     write(V[j]);
                 end;
        end
     Else
        begin
             writeln('el numero es mayor a la cantidad de bits a trabjar');
        end;             {mostrar si se pasa del tope}
{------------------------------------------------}
{esto me sirve para cambiar los 1 por 0 y viceversa}
for h:=1 to bits do
 begin
    If V[h]=1 then
     begin
      V[h]:=0;
     end
    else
     begin
      V[h]:=1;
    end;
   write(V[h]);
   end;
{------------------------------------------------}
{ahora no sé como codificarlo en DELPHI}
{mi idea es despues pasar esto a una funcion,
 pero primero lo hago asi para ver si funciona}
readkey;
end.
bueno, espero tu respuesta, desde ya muchas gracias por tu tiempo.
saludoS!

Si lo hubieses puesto en Programacion segurito encuentras quien te ayude amigo, si Waldo puede que lo pase al sub-foro Programacion.

Un mensaje, una ayuda, en el 1er subforo que ve como si nada

Gracias... Lo que pasa es que soy nuevo, y todavia no la manejo tan bien los foros y otras cositas.... gracias de toda forma.