Pascal/Turbo Pascal - Problema con el formato de un producto

Hola amigos. Estoy aprendiendo Pascal solita, siguiendo un libro claro está, pero solita porque no tengo ayuda disponible por acá. Ayer se me presentó un problemita, quise hacer un ejercicio que enuncio y resuelvo más abajo. Claro, logré el resultado del ejemplo porque limite los productos a un número (primerresultado:=numero1*6;), sin embargo, el programa no es eficaz puesto que se supone uno debiera poder colocar cualquier número ¿Verdad? Que fuese efectivo para cualquier entero de tres dígitos. Ojala puedan ayudar un poco a ésta novata.

9. Escribir un programa que lea dos enteros de tres dígitos e imprima su producto en el siguiente

formato:

-----325
-----426
---_____
----1950
----650
--1300
---_____
-138450

Intento de programa:

Program project1;
uses
crt;
const
rayita = #95;
var
numero1,numero2,primerresultado,segundoresultado,tercerresultado,resultado: integer;
begin
writeln('Por favor introduzca el primer numero entero');
readln(numero1);
writeln('Por favor introduzca el segundo numero entero');
readln(numero2);
writeln('Los resultados son: ');writeln;
primerresultado:=numero1*6;
segundoresultado:=numero1*2;
tercerresultado:=numero1*4;
resultado:=numero1*numero2;
writeln(numero1:6);
writeln(numero2:6);
writeln(rayita,rayita,rayita,rayita,rayita,rayita);
writeln(primerresultado:6);
writeln(segundoresultado:5);
writeln(tercerresultado:4);
writeln(rayita,rayita,rayita,rayita,rayita,rayita);
writeln(resultado:6);
readln
end.


Salida con formato:

Los resultados son:

-----325
-----426
---_____
----1950
----650
--1300
---_____
-138450

Hay un pequeño detalle en el resultado:

Los resultados son:

-----325
-----426
---_____
----1950
----650
-1300
---_____
-138450

El primer cero del 1300 debe quedar alineado.

Mi pregunta especifica sería: ¿Cómo hago para indicarle al programa que los resultados de los productos deben mostrarse así? Es decir, donde está el 1950 es el producto de 6 por 325, la siguiente línea del 2 por 325, y el 1300 por el 4...

Una ayudita por favor =(

Considera usar GotoXY() para situal el cursor en un lugar de la pantalla.