program masuvu_1_9; {$APPTYPE CONSOLE} uses SysUtils; var b,a:array[1..10000] of integer ; c,k2,i,n:integer; begin readln(n); k2:=0; for i:=1 to n do begin readln(a[i]); if (a[i] mod 3=1) and (a[i] mod 5=2) then begin k2:=k2+1; b[k2]:=a[i]; end; end; for i:=1 to k2 do writeln(b[i]); readln; end.