Pascal/Turbo Pascal - Dibujar triangulo rectangulo

Buenas tardes, estoy iniciandome en pascal y estoy trabado con este ejercicio

Diseñe el algoritmo que genere un triángulo rectángulo, con esta forma:
1
1 2
1 2 3
1 2 3 4
…….
1 2 3 4 5 6 7 8 9 ……N

me gustaria que puedan orientarme desde ya muchas gracias

Es algo como esto.

program rectangle;
uses
crt;
var
y, x : integer;


procedure rentan;
begin
for x := 1 to 4 do
begin
for y := 1 to x do
write(y);
writeln;
end;
end;

begin
clrscr;
rentan;
readln;
end.