8. Membuat Segitiga dari Angka kecil ke Besar

program forNum1;
{membuat gambar seperti: 1
                         1 2
                         1 2 3
                         1 2 3 4
                         1 2 3 4 5}
uses crt;
var
   i,j:integer;
begin
clrscr;
       for i:=1 to 5 do
       begin
            for j:= 1 to i do
            write(j,' ');
            writeln;
       end;
readln;
end.