procedure Gnat.Io.T is N:Integer;begin Get(N);For I In 1..N Loop Put(i);Put(":");for J in 1..I loop if i mod j=0 then Put(j);Put((1..1-J/I=>' '));End If;End loop;New_Line;end loop;end;