program star;
uses CRT;
var
  a,x,y:integer;

begin
  for a:=1 to 150 do
  begin
     randomize;
    x:=random(75)+3 ;
    y:=random(22)+2;
    gotoxy(x,y);
     write('*');



  end;
  readln;
end.