代码搜索：Microphone array
找到约 10,000 项符合「Microphone array」的源代码
代码结果 10,000
www.eeworm.com/read/184327/9109610
pas ac1149.pas
program tju1149;
const
tests=8;//A chr(26) at eof, causing RE 106. So gotta do like this!
maxn=300;
var
t1,t2,state:array[1..maxn]of byte;
len:array[1..maxn,1..maxn]of byte;
time:arra
www.eeworm.com/read/184327/9109621
pas ac1175.pas
program tju1175;
const
maxwords=10000;
var
w:array[1..maxwords]of string;
a,pre:array[1..maxwords]of word;
last:array[0..26]of word;
t,u,n,i,l,r,m:longint;
s1,s2:ansistring;
c:c
www.eeworm.com/read/184327/9109671
pas ac1124.pas
program tju1124;
const
maxn=100;
type
matrix=array[1..maxn,1..maxn]of integer;
array1=array[1..maxn-1]of longint;
array2=array[2..maxn]of longint;
var
a,b:matrix;
lmax,lmin,umax,u
www.eeworm.com/read/184327/9109712
pas ac1049.pas
program tju1049;
const
maxn=10;
maxw=4000;
var
m,x:array[1..maxn]of byte;
w:array[0..maxw]of word;
t,u,n,i,j,k,l,ans:word;
begin
read(t);
for u:=1 to t do begin
read(n);
www.eeworm.com/read/184327/9109725
pas ac1074.pas
program tju1074;
const
maxsize=10;
maxmc=10;
exp:array[1..maxmc]of word=(1,2,4,8,16,32,64,128,256,512);
dx:array[1..4]of shortint=(-1,0,1,0);
dy:array[1..4]of shortint=(0,1,0,-1);
var
www.eeworm.com/read/184327/9109873
pas ac1050.pas
program tju1050;
const
maxn=100;
var
w:array[1..maxn]of string;
l:array[1..maxn]of byte;
ans:array[0..255]of byte;
s:string;
t,u,n,i,j:word;
begin
readln(t);
for u:=1 to t d
www.eeworm.com/read/184327/9109879
pas ac1051.pas
program tju1051;
const
maxsize=200;
dx:array[1..4]of shortint=(0,0,-1,1);
dy:array[1..4]of shortint=(-1,1,0,0);
var
map:array[0..maxsize+1,0..maxsize+1]of char;
qx,qy:array[1..sqr(max
www.eeworm.com/read/184327/9109957
pas ac1076.pas
program tju1076;
const
m=7;
var
f:array[0..m*m+1]of byte;
p:array[0..m-1,0..m-1]of longint;
a,b,n,i,t:longint;
begin
f[1]:=1;f[2]:=1;
repeat
read(a,b,n);
if n=0 then hal
www.eeworm.com/read/184327/9109961
pas ac1045.pas
program tju1045;
const
dx:array[1..8]of shortint=(-1,-2,-2,-1,1,2,2,1);
dy:array[1..8]of shortint=(2,1,-1,-2,-2,-1,1,2);
var
n,i,x,y,j,ans:longint;
c:char;
begin
readln(n);
for i:
www.eeworm.com/read/184327/9110096
pas ac1211.pas
program tju1211;
const
maxm=10;
maxlines=60;
bit:array[1..10]of word=(512,256,128,64,32,16,8,4,2,1);
var
max:array[1..maxm]of byte;
line:array[1..maxlines]of word;
count:array[1..m