Program Ponork;

var i, j, krok, kroku, useku, vstupu: integer;
    delka: real;
	zbytek2: real;
begin
 
  readln(vstupu);
  for i:=1 to vstupu do begin
    kroku:=0;
    zbytek2:=0;
	
    readln(krok, useku);
	for j:=1 to useku do begin
	  readln(delka);
      if zbytek2>0
	  then begin
        Delka:=delka-(sqrt(sqr(krok)-zbytek2));
		Inc(kroku);
	  end;
      while delka>=krok
	  do begin
        Delka:=Delka-krok;
		Inc(kroku);
	  end;
      zbytek2:=sqr(delka);
	end;
    if (4*zbytek2)>sqr(krok)
	then Inc(kroku);
  	Writeln('Strazny ujde ', kroku, ' ponorku.');
  end;
end.