Pascal/Turbo Pascal - dudas

amigos gracias por ayudarme, pero tengo algunas dudas: en el procedimiento que propone miguel no entiendo la utilidad de lo siguiente result:=result*10, tampoco como o donde voy a visualizar los numeros del binario
Soy del primer nivel, mi experiencia es muy escasa en programación, estoy empezando

Saludos Paco. Bueno dejando atrás las opiniones de los últimos posts
checa esta función si te das cuenta lo único que haces es ir dividiendo la cadena y checando los residuos del numero dividido entre 2 que es la base que buscas. Encontrarás algunos detalles pequeños como que la cadena te sale invertida o que se yo, pero es algo sencillo de arreglar solo utiliza un poco de ingenio.

Suerte

|FUNCTION BASE2(N:INTEGER):STRING;
|VAR
| CAD:STRING[16];
|BEGIN
| CAD:='';
| REPEAT
| IF (N MOD 2 = 0) THEN
| BEGIN
| CAD:=CAD+'0';
| END
| ELSE CAD:=CAD+'1';
| N:=N DIV 2;
| UNTIL N=0;
| BASE2:=CAD
|END;

Te lo puedo esplicar de manera más fácil, sólo escribeme

Deberías de explicarlo de una vez y listo, si lohaces de manera pública puedes no beneficiar a uno sino a varios.

Tranquilo que lo haré de forma pública, pero necesito tiempo. Además si alguien lo quiere, solo tiene que escribirme que se lo mando. Como digo trataré de dar la respuesta pública y concreta para que todos lo vean. Pero necesito tiempo para crearla. Es más, podría colgarlo en algún sitio, pero no se donde.

Quiero publicarlo públicamente, pero necesito tiempo para crearlo. Si alguien está interesado, lo publicaré en el foro dentro de unos días. Si alguien lo quiere, que me mande un e-mail, y le mandaré el programa (cuando le tenga terminado).

Quiero hacerlo público cuando lo termine, pero tardaré un poco tiempo. Cuando lo tenga lo publicaré en el foro. Si alguien está interesado no solo en el algoritmo (pseudocódigo es lo que uso), que me escriba y le mandaré el programa (cuando le tenga hecho).