求一道pascal题是这样的：program noip21;var d,p:integer;beginp:=1;d:=1

求一道pascal题是这样的：program noip21;var d,p:integer;beginp:=1;d:=1 program Noname0; const n=7; var a:array[1..n] of integer; i, program lx2 Var a,b,c:integer; Begin read(a,b); c:=a; a:=b; 正则表达式中这句话的意思是： var aa = /^([A-Z]|[a-z]|[\d]|[\-])*$/; #define BIT_SET(var,bit) ((var) |= (1 var i,j:integer; begin for i:=1 to 5 do begin for j:=1 to i 能不能再帮我看一道题sum Fun (a() as integer,x as integer) for i = 1 to 求pascal的一道题, pascal数组中dy:array[1..4] of integer=(0,1,-1,0);这个=（1,0,0-1, var p = offset offset.slice(0) :[0,0],tn; 三元表达式不是应该 b:b:c,d这 请教一道解方程的题 (1).a+d=aq^2 ( 2).a+2d=aq 求q和d的值 矩阵的乘法问题已知A矩阵,P矩阵和P^-1,矩阵D是未知的有等式 A=PDP^-1,求矩阵D这里我能不能让P先乘P^-1