Pascal输出星星

 program Project2;

 {$APPTYPE CONSOLE}

 uses
   SysUtils;

 var
   i,j:integer;

 begin
   { TODO -oUser -cConsole Main : Insert code here }
   for i:= to  do
   begin
   for j:= to i do
   write('*');
   writeln;
   end;
   readln;
 end.