代码搜索结果
找到约 1,193 项符合
Q 的代码
ac1246.pas
{$Q-,R-}
program tju1246;
const
maxn=20;
var
a,s:array[0..maxn]of word;
cut,min:array[1..maxn,1..maxn]of word;
n,i,j,k,t:longint;
procedure dfs1(l,r:byte);
begin
if l=r then
ac1249.pas
{$Q-,R-}
program tju1249;
const
maxn=1000;
maxv=maxn*2+2;
maxe=maxn*12;
var
edge:array[1..maxe]of record pre,v1,v2:word;cap:byte;cost:integer;end;
last,q,from:array[1..maxv]of word;
ac1278.pas
{$Q-,R-}
program tju1278;
const
maxn=200;
inf=65535;
var
buy,eat:array[1..maxn]of byte;
sum:array[0..maxn]of word;
time:array[boolean,0..sqr(maxn)]of word;
n,i,j,t1,t2:longint;
ac1275.pas
{$Q-,R-}
program tju1275;
const
maxn=20;
states=1048576;
maxm=100;
var
e:array[1..maxn]of cardinal;
time:array[1..maxm]of cardinal;
mask:array[1..maxm,1..4]of cardinal;
dist,hp
ac1242.pas
{$Q-,R-}
program tju1242;
const
maxn=30000;
maxe=100000;
maxq=100000;
var
edge:array[1..maxe]of record v1,v2:word;pre1,pre2:longint;del:byte;end;
query:array[1..maxq+maxe-maxn+1]of r
ac1264.pas
{$Q-,R-}
program tju1264;
const
maxn=1000000;
var
d:array[1..maxn]of word;
bq,sq:array[1..maxn]of longint;
n,k,i,bf,br,sf,sr,head,ans,m:longint;
begin
repeat
read(n,k);
bf
ac1225.pas
{$Q-,R-}
program tju1225;
const
maxchange=100001;
treesize=524287;
root=treesize shr 1+1;
var
tree:array[1..treesize]of longint;
n,limit,delta{real minus stored},total,leave,i,k:long
ac1251.pas
{$Q-,R-}
program tju1251;
const
max=90;
var
key,letter:string[max];
freq:array[1..max]of longint;
sum,cost,cut:array[1..max,1..max]of longint;
k,l,i,j,e,f,x,t:longint;
procedure out
ac1250.pas
{$Q-,R-}
program tju1250;
const
maxn=1000;
bignumsize=99;
compress=15;
base=32768;
primes=42;
type
bignum=array[-1..bignumsize]of longint;
var
p:array[1..primes]of byte;
fi
ac1265.pas
{$Q-,R-}
program tju1265;
const
maxn=10000;
var
time,factor:array[0..maxn]of longint;
cost:array[0..maxn]of qword;
q:array[0..maxn]of word;
n,s,i,f,r:longint;
function slope(a,b:wor