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.