program segitiga_sembarang; var i,j,k,n : integer; begin readln(n); for i:=1 to n do begin for j:=i to n do begin write(' '); end; for k:=i to j do begin write('*'); end; writeln; end; end.