å½æ°ä¸è¿ç¨
主è¦ä½ç¨å¨äºä½¿ç¨åºç»ææ¸
æ°ï¼å
»æ模åå解å³é®é¢çä¹ æ¯ã
å½ç¶ä¹å¯ä»¥ç¨å¨è§£å³å¾ªç¯ãéå½æ¹é¢çä¸äºé®é¢ã
1.å½æ°
PASCALç»æ们æä¾äºä¸äºæ åå½æ°ï¼æ们ä¸ç¨äºè§£è¿äºå½æ°å¦ä½æ±åºæ¥çï¼åªç®¡ç´æ¥è°ç¨å®ä»¬ï¼æºæ¹ä¾¿çãå¦æ£å¼¦å½æ°ï¼ä½å¼¦å½æ°ï¼ç®æ¯å¹³æ¹æ ¹......æäºè¿äºå½æ°ï¼æ们è§å¾å¾çäºãå¦ï¼æ±SIN(1)+SIN(2)+...+SIN(100)ï¼ï¼è¿ä¸ªç¨åºæ们å¯ä»¥è¿æ ·ç¼åï¼
ä¾1
PROGRAM e1(input,output);
VAR i:integer;
s:real;
BEGIN
s:=0;
for i:=1 to 100 do
s:=s+sin(i);
writeln('s=',s);
END.
å¨è¿ä¸ªç¨åºéï¼æ们ç´æ¥ç¨å°äºæ£å¼¦å½æ°ï¼è³äºSIN(1),SIN(2)å¦ä½æ±åºæ¥çæ们ä¸éè¿é®ï¼åªç®¡ç´æ¥ç¨å®çç»æ便æ¯äºã
æ们æ¥ççä¸é¢ä¸ä¸ªä¾åï¼æ±ï¼1!+2!+3!+....+10!=?
å¦æè¦ç¼åç¨åºï¼æ们çå°æ±é¶ä¹çæä½è¦æ§è¡10次ï¼åªä¸è¿æ¯æ¬¡ææ±çæ°ä¸åãæ们æ³ï¼ä¸è³äºç¼å10éæ±é¶ä¹çç¨åºå§ãæ们å¸ææä¸ä¸ªæ±é¶ä¹çå½æ°ï¼å设为JS(X)ï¼é£ä¹æ们就å¯ä»¥è¿æ ·æ±è¿éé¢äºï¼
ä¾2
PROGRAM e1(input,output);
VAR i:integer;
s:real;
BEGIN
s:=0;
for i:=1 to 10 do
s:=s+js(i);
writeln('s=',s);
END.
ç°å¨çé®é¢æ¯ï¼TURBO PASCAL没æä¾JS(X)è¿æ ·ä¸ä¸ªæ åå½æ°ï¼è¿ä¸ªç¨åºæ¯éä¸è¿çãå¦ææ¯PASCALçæ åå½æ°ï¼æ们å¯ä»¥ç´æ¥è°ç¨ï¼å¦TRUNC(X)ï¼LN(X)ï¼SQRT(X)....èPASCALæä¾ç»æ们çå¯ä¾ç´æ¥è°ç¨çæ åå½æ°ä¸å¤ã没å
³ç³»ï¼æ们ç¼åèªå·±çå½æ°ï¼
1.2 å½æ°çç¼å
èªå·±ç¼åä¸ä¸ªå½æ°ï¼å®çæ ¼å¼å¦ä¸ï¼
FUNCTION å½æ°åï¼å½¢å¼åæ°è¡¨ï¼ï¼å½æ°ç±»åï¼
VAR å½æ°çåé说æï¼
BEGIN
å½æ°ä½
ENDï¼
æ们æ¥åæä¸ä¸ï¼ä¸ä¸ªå½æ°çç¼åå¯åæä¸é¨ä»½ï¼ä¸æ¯å½æ°é¦é¨ï¼å³ç¬¬ä¸ä¸ªè¯å¥ãå®å¿
须以FUNCTIONå¼å¤´ï¼å½æ°åæ¯èªå·±åçï¼ååçååæ¯ä¾¿äºè®°å¿ï¼åæ件åçååè§å类似ãå½¢å¼åæ°ï¼ç®ç§°å½¢åï¼è¡¨ä»¥æ è¯ç¬¦çå½¢å¼ç»åºï¼ç¸å½äºå½æ°ä¸çèªåéãåæ°å¯ä»¥æå¤ä¸ªï¼ä¹å¯ä»¥æå¤ç§ç±»åãä¸åç±»åçåæ°ä¹é´ç¨"ï¼"éå¼ï¼åç±»åçåæ°å¦æå¤ä¸ªï¼åç¨"ï¼"éå¼ï¼å¨å
¶åå¾å ä¸è¯´æãå¦ï¼
FUNCTION A1ï¼Aï¼Bï¼Cï¼INTEGERï¼Dï¼Eï¼Fï¼REALï¼ï¼REALï¼
å¨æåï¼å½æ°å±äºåªç§ç±»åï¼è¿å¾è¡¨ç¤ºåºæ¥ãå¨æ¬ä¾ä¸ï¼è¯¥å½æ°ä¸ºå®åã
第äºé¨åæ¯å½æ°çåé说æé¨åï¼å¯¹å¨æ¬å½æ°ä¸å°è¦ç¨å°çåéä½ç±»å说æï¼è¿ä¸ç¹å以åå¦çåéä¸æ ·ãå¦æç¨åºä¸ç¨åéï¼åæ¤é¨åä¹å¯çæã
第ä¸é¨åæ¯å½æ°ä½ï¼æ¬å½æ°çåè½å®ç°å°±å¨äºæ¤ï¼ç¼åçè¯å¥å°±å¨éé¢ã
ä¾3 ç¼åä¸æ±é¶ä¹çå½æ°ã
æ们ç»æ¤å½æ°åä¸ååå°±å«JSã
fUNCTION js(n:integer):longint;
var i:integer;
s:longint;{æ°åæ¯è¾å¤§ï¼æ以è¦ç¨é¿æ´å}
begin
s:=1;
for i:=1 to n do
s:=s*i;
js:=s;{è¿ä¸æ¥å¾éè¦!!!}
end;
å¨æ¬ä¾ä¸ï¼å½æ°åå«JSï¼åªæä¸ä¸ªINTEGERåçèªåéNï¼å½æ°JSå±LONGINTåãå¨æ¬å½æ°ä¸ï¼è¦ç¨å°ä¸¤ä¸ªåéIï¼Sï¼å¨VARåå·²å 以说æãå¨å½æ°ä½ä¸ï¼æ¯ä¸ä¸ªæ±é¶ä¹çè¯å¥ï¼ä½æä¸ç¹è¦æ³¨æï¼è½ç¶Nçé¶ä¹çå¼å¨Sä¸ï¼ä½æåå¿
é¡»å°æ¤å¼èµç»å½æ°JSï¼æ¤æ¶JSä¸å¸¦ä»»ä½åæ°ãå¨ä»»ä½å½æ°ä¸ï¼æåé½è¦ææç»ç»æèµç»å½æ°åï¼å 为该å½æ°çç»ææ¯é å½æ°åè¿åçã
å¨è¿éï¼å½æ°çåæ°Næ¯ä¸ä¸ªæ¥å£åæ°ï¼è¯´å¾æ´æç¡®ç¹æ¯å
¥å£åæ°ãå¦ææ们è°ç¨å½æ°ï¼JS(3)ï¼é£ä¹å¨ç¨åºéæææNçå°æ¹N被æ¿ä»£æ3æ¥è®¡ç®ãå¨è¿éï¼3就被称为å¼åãåå¦ï¼SQRT(4)ï¼LN(5)ï¼è¿éç4ï¼5å«å¼åãèSQRT(X)ï¼LN(Y)ä¸çXï¼Yå«å½¢åã
1.3 å½æ°çè°ç¨
èªå®ä¹çå½æ°å¨è°ç¨åè¦å
说æï¼å¨ä¸»ç¨åºä¸çä½ç½®å¦ä¸:
PROGRAM ç¨åºå(INPUT,OUTPUT);
VAR 主ç¨åºåé说æ;
FOUNCTION å½æ°å(å½¢å表):å½æ°ç±»å;
VAR å½æ°åé说æ;
BEGIN
å½æ°ä½
END
BEGIN
主ç¨åº
END.
å¨ä¸»ç¨åºä¸ï¼æ们æå½æ°çå
¨é¨è¯´ææ¾å¨ä¸»ç¨åºçåé说æåç¨åºä½ä¹é´ï¼ç¶åå¨ä¸»ç¨åºçæ§è¡é¨åå°±å¯ä»¥ç´æ¥è°ç¨èªå®ä¹å½æ°äºã注æï¼å¨å½æ°ç说æé¨åï¼æ们è¦ç¨å½¢åï¼ä½å¨ç¨åºçæ§è¡é¨åè°ç¨èªå®ä¹å½æ°æ¶ï¼å°±å¾ç¨å¼åäºã
ä¾4 å©ç¨åé¢å®ä¹çé¶ä¹å½æ°ï¼æ±5!, 9!ã
PROGRAM e59(input,outout);
VAR a1,a2:longint;
FUNCTION js(n:integer):longint;
var i:integer;
s:longint;
begin
s:=1;
for i:=1 to n do
s:=s*i;
js:=s;
end;
BEGIN
a1:=js(5);
a2:=js(9);
writeln('5!=',a1,' ','9!=',a2);
END.
å¨è¿ä¸ªç¨åºä¸ï¼å¨ä¸»ç¨åºçBEGINä¹åï¼æ们对å½æ°è¿è¡äºä¸æ¬¡è¯´æï¼å¨åé¢çç¨åºä¸é½å¯ä»¥è±¡æ åå½æ°é£æ ·ç´æ¥è°ç¨èªå®ä¹å½æ°äºãå¨FUNCTIONè¯å¥ä¸ï¼ç¨çæ¯å½¢åNï¼å¨ä¸»ç¨åºè°ç¨ä¸ï¼è°ç¨å½æ°æ¯ç¨çå¼åï¼å¦ï¼JS(5)ï¼ç¨åºæ§è¡å°è¿å¿ä¼èªå¨å°5代å
¥åé¢çFUNCTIONå½æ°ä¸ï¼ç¨5 å代ææçNï¼æç»å°ç»æèµå¼ç»JSãæ以å¨A1ä¸ä¸å®æ¯5!ï¼A2ä¸æ¯9!ãå¦å¤ï¼å½æ°ä¸è½åç¬ä½¿ç¨ï¼ä¸å®è¦ç»å主ç¨åºæè½è¿è¡ã
å¦ææ¯æ±1!+2!+3!+...+10!ï¼ååªéæ主ç¨åºæ¹æï¼
A1:ï¼0;
FOR J:ï¼10 TO 10 DO
A1:ï¼A1+JS(J);
WRITELN(A1);
å¨ä¾4ä¸ï¼ä¸»ç¨åºçåéA1ï¼A2å«å
¨ç¨åéï¼å®ä»¬é¤äºä¸»ç¨åºå¤ï¼è¿å¯ä»¥å¨å½æ°ä¸åºç°ï¼å¨å½æ°è¯´æä¸ç¨å°çåéIï¼Såæ¯å±é¨åéï¼åªè½å¨å½æ°é¨å使ç¨ï¼ä¸æ¦åºäºå½æ°å失å»æä¹ï¼å«å¤è¦æ³¨æï¼å
¨ç¨åéåå±é¨åéå°½éä¸è¦ååã
ä¾5 ä»»æè¾å
¥10ç»ä¸è§å½¢çä¸è¾¹ï¼æ±å
¶é¢ç§¯ã
å·²ç¥ä¸è§å½¢çä¸è¾¹ï¼æ¯å¯ä»¥æ±åºé¢ç§¯çãæ们å¯ä»¥å®ä¹ä¸ä¸ªå·²ç¥ä¸è§å½¢ä¸è¾¹æ±å
¶é¢ç§¯çå½æ°ï¼è®¾ä¸ºAREAï¼a1,a2,a3ï¼ã
PROGRAM e5(inmput,output);
VAR a,b,c,s:real;
i:integer;
FUNCTION area(a1,a2,a3:real):real;
var s1,d:real;
begin
d:=(a1+a2+a3)/2;
s1:=Sqrt(d*(d-a1)*(d-a2)*(d-a3));
area:=s1;
end;
BEGIN
for i:=1 to 10 do
begin
writeln('input a,b,c');
readln(a,b,c);
if (a+b<=c) or (a+c<=b) or(b+c<=a)
then writeln('data error!')
else writeln('s=',area(a,b,c));
end;
END.
å¨å½æ°è¯´æä¸ï¼å¦æå½¢åç个æ°ä¸æ¢ä¸ä¸ªï¼é£ä¹å¨ç¨åºä¸è°ç¨å½æ°çå®å个æ°ä¸å®è¦ä¸å½¢åç个æ°ä¸è´ï¼ç¬¬ä¸ä¸ªå®å对åºç¬¬ä¸ä¸ªå½¢åï¼ç¬¬äºä¸ªå®å对åºç¬¬äºä¸ªå½¢å.......次åºä¸è½è°ã
ä¾6 å®ä¹ä¸ä¸ªå½æ°CHECK(N,D)ï¼è®©å®è¿åä¸ä¸ªå¸å°å¼ãå¦ææ°åDå¨æ´æ°Nçæä½ä¸åºç°åéåTRUEï¼å¦åéåFALSEãä¾å¦ï¼
CHECK(325719,3)ï¼TRUEï¼
CHECK(77829,1)ï¼FALSEï¼
PROGRAM e6(input,output);
VAR a,b:integer;
FUNCTION check(n,d:integer):boolean;
var f:boolean;
e:integer;
begin
f:=false;
while (n>0) and (not f) do
begin
e:=n mod 10;
n:=n div 10;
if e=d then f:=true;
end;
check:=f;
end;
BEGIN
writeln('input n,d');
read(a,b);
writeln(check(a,b));
END.
2.è¿ç¨
è¿ç¨åå½æ°ä¸æ ·ï¼ä¹æ¯åç¨åºãä¸ä¸ªè¿ç¨å¯¹åºä¸ä¸ªéè¦å®æçä»»å¡ãPASCALä¸æä¾äºä¸å°æ åè¿ç¨ï¼å¦ï¼READ,WRITE,GET,NEW,PUT.......è¿äºæ åè¿ç¨å¨ç¨åºä¸å¯ä»¥ç´æ¥è°ç¨ãä½ä»
ä»
è¿äºæ åè¿ç¨è¿ä¸è½æ»¡è¶³æ们çéè¦ï¼æ们è¿è¦èªå·±å®ä¹è¿ç¨ï¼å°±è±¡å½æ°ä¸æ ·ãä½å½æ°å¿
须以å¼çå½¢å¼è¿åï¼èè¿ç¨ä¸ä¸å®è¿åä¸ä¸ªå¼ï¼åªæ¯æ§è¡ä¸ä¸ªä»»å¡èå·²ï¼å½æ°åªè½è¿åä¸ä¸ªå¼ï¼èè¿ç¨å¯ä»¥è¿åä¸æ¢ä¸ä¸ªå¼ãæ以å½æ°ä¸è½å代è¿ç¨ã
2.1 è¿ç¨çå®ä¹
è¿ç¨å®ä¹çæ ¼å¼å¦ä¸ï¼
PROCEDURE è¿ç¨åï¼å½¢å¼åæ°ï¼ï¼
VAR è¿ç¨çåé说æï¼
BEGIN
è¿ç¨ä½
END;
å¯¹è¯¥æ ¼å¼è¯´æå¦ä¸ï¼
ä¸ä¸ªè¿ç¨ä¹å为ä¸é¨åï¼1.è¿ç¨çé¦é¨ãè¿ç¨å¿
须以PROCEDUREå¼å¤´ï¼è¿ç¨åçååè§ååå½æ°åä¸æ ·ï¼æ¬å·éé¢æ¯å½¢å¼åæ°ï¼å¦å½¢åä¸æ¢ä¸ç§ï¼åä¸é´ç¨"ï¼"éå¼ï¼å类形åå¦ä¸æ¢ä¸ä¸ªï¼åä¸é´ç¨"ï¼"éå¼ãå¦ï¼ææ¶ä¾¯è¿ç¨ä¸ç¨å åæ°ã2.è¿ç¨ç说æé¨åï¼ç¨VARå¼å¤´ï¼å®åªè½å¯¹è¿ç¨ä¸çåéè¿è¡è¯´æï¼åæ ·æ¯å±é¨åéãå¦ï¼å¦æè¿ç¨ä¸ç¨åéï¼åå¯å°è¯´æé¨åçç¥ã3.è¿ç¨ä½ãå®æ¯è¿ç¨çæ§è¡é¨åã
æ们æ¥å®ä¹ä¸ä¸ªæå°ç±"*"ç»æçç©éµçè¿ç¨ï¼è¯¥ç©éµåè¡äºåã
ä¾7
PROCEDURE print;
var i,j:integer;
begin
for i:=1 to 4 do
begin
for j:=1 to 5 do
write('*');
writeln;
end;
end;
该è¿ç¨å°±æ²¡æåæ°ï¼ç´æ¥æ§è¡æå°ä¸ä¸ªåºå®ç©éµçä»»å¡ï¼èä¸ä¹æ²¡è¿åå¼ã
ä¾7 å®ä¹ä¸ä¸ªæ±Nï¼çè¿ç¨ã
PROCEDURE js(n:integer);
var s:longint;
i:integer;
begin
s:=1;
for i:=1 to n do
s:=s*i;
writeln(n,'!=',s);
end;
å¨è¯¥è¿ç¨ä¸ï¼å®çå¼çè¿åå½¢å¼åå½æ°ä¸ä¸æ ·ï¼å½æ°æ¯ç±å½æ°åè¿åï¼èè¿ç¨ä¸æ¯ç±å½æ°åè¿åçï¼å¨è¿ç¨çé¦é¨ä¸ç¨å¯¹è¿ç¨çç±»åè¿è¡è¯´æã
2.3 è¿ç¨çè°ç¨
èªå®ä¹è¿ç¨å¨ç¨åºè°ç¨ä¹åè¦å
说æï¼è¿ç¨ç说æå°±å¨ä¸»ç¨åºçæ§è¡è¯å¥ä¹åãå
¶æ ¼å¼å¦ä¸ï¼
PROGRAM ç¨åºå(INPUT,OUTPUT);
VAR 主ç¨åºçåé说æ;
PROCEDURE è¿ç¨å(å½¢å¼åæ°è¡¨);
VAR è¿ç¨çåé说æï¼
BEGIN
è¿ç¨ä½
END;
BEGIN
主ç¨åºä½
END.
ä¾8.ä»»æè¾å
¥10个ä¸è§å½¢çä¸è¾¹ï¼ç¨è¿ç¨æå
¶é¢ç§¯æ±åºã
æ们ææ±ä¸ä¸ªå·²ç¥ä¸è¾¹çä¸è§å½¢çé¢ç§¯å®ä¹ä¸ä¸ªè¿ç¨ï¼å¯¹æ¯ä¸ä¸åä¾5æä»ä¹ä¸åã
PROGRAM e5(inmput,output);
VAR a,b,c,s:real;
i:integer;
PROCEDURE area(a1,a2,a3:real);
var s1,d:real;
begin
d:=(a1+a2+a3)/2;
s1:=Sqrt(d*(d-a1)*(d-a2)*(d-a3));
writeln('s=',s1);
end;
BEGIN
for i:=1 to 10 do
begin
writeln('input a,b,c');
readln(a,b,c);
if (a+b<=c) and (a+c<=b) and (b+c<=a)
then writeln('data error!')
else area(a,b,c);
end;
END.
æ们çå°ï¼è¿ç¨çè°ç¨åå½æ°ä¸åãå½æ°ä¸è½ä½ä¸ºç¬ç«çä¸ä¸ªè¯å¥ä½¿ç¨ï¼èè¿ç¨å¯ä»¥ãå½æ°çå¼æ¯ç±å½æ°åè¿åçï¼èè¿ç¨ä¸è½ã
ç°å¨æ们æåºä¸ä¸ªè¦æ±ï¼ç¨è¿ç¨æ±åº1!+2!+3!+....10!ï¼?
æ±N!çé®é¢æ们å¨ä¾7å·²ååºæ¥ï¼ä½é¶ä¹çç»ææ¯å¨è¿ç¨éç¨WRITEè¯å¥è¾åºçï¼ä¸è½ç¨ç´¯å è¯å¥æç»ææ±åºæ¥ãé£ä¹ï¼ææ ·ç¨è¿ç¨å°ç±»ä¼¼çé®é¢æ±åºæ¥ï¼è¿å°±å¾ç¨å°åéåæ°ã
2.4åéåæ°
å¨è¿ç¨å®ä¹çè¯å¥ä¸ï¼æ个åæ°è¡¨ï¼å¨åæ°è¡¨ä¸ï¼é¤äºåé¢æ们已ç¨çå¼åï¼è¿æåéåæ°ãåéåæ°çä½ç¨æ¯ï¼å®å¯ä»¥ä½ä¸ºè¿ç¨çåºå£åæ°ãæ们å¯ä»¥æè¿ç¨ä¸æ±åºçç»æç¨åéåæ°è¾åºå°è¿ç¨å¤ï¼å¨è¿ç¨å¤é¢å¯ä»¥è°ç¨è¯¥åæ°ï¼å æ¤ï¼è¯¥åæ°æ¯å
¨å±åéãå
¶æ ¼å¼ä¸çåºå«æ¯å¨åéåæ°åå ä¸VARå³å¯ã
é£ä¹æ们ç°å¨æ¥æ±1!+2!+3!+....+10!ï¼?
ä¾9
PROGRAM e9(input,output);
VAR j:integer;
s,m:longint;
PROCEDURE js(n:integer;var m:longint);
var i:integer;
begin
m:=1;
for i:=1 to n do
m:=m*i;
end;
BEGIN
s:=0;
for j:=1 to 10 do
begin
js(j,m);
s:=s+m;
end;
writeln('s=',s);
END.
å¨æ¬ä¾ä¸ãæ们çå°ï¼è¿ç¨JSä¸ç¨å°äºåéåæ°Mï¼å¨è¿ç¨ä¸å®ä¹ä¸ºLONGINTç±»åï¼èå¨ä¸»ç¨åºçåé说æä¸ä¹å¾å¯¹åéåæ°M说æ为åç§ç±»åLONGINGTãäºæ¯ï¼å¨è¿ç¨ä¸å主ç¨åºä¸é½å¯ä»¥ç¨è¯¥åéäºãæ们å¨è°ç¨è¿ç±»è¿ç¨æ¶ï¼å¨æ¬å·ä¸è¦åä¸ææçåæ°ï¼ä½ç¨ä¸çåä¸åæ°çç±»ååVARäºã
3.5 å½æ°åè¿ç¨çåºå«
è¿ç¨åå½æ°é½ä¸ºåç¨åºï¼ä½ä¹æåºå«ï¼
1. æ è¯ç¬¦ä¸åãå½æ°çæ è¯ç¬¦ä¸ºFUNCTIONï¼è¿ç¨ä¸ºPROCEDUREã
2. å½æ°ä¸ä¸è¬ä¸ç¨åéåæ°ï¼ç¨å½æ°åç´æ¥è¿åå½æ°å¼ï¼èè¿ç¨å¦æè¿åå¼ï¼åå¿
é¡»ç¨åéåæ°è¿åã
3. å½æ°å¨å®ä¹æ¶ä¸å®è¦è¿è¡å½æ°çç±»å说æï¼è¿ç¨åä¸è¿è¡è¿ç¨çç±»å说æã
4. å½æ°å¨è°ç¨æ¶ä¸è½ä½ä¸ºä¸ä¸ªåç¬è¯å¥ä½¿ç¨ï¼èè¿ç¨å¨è°ç¨æ¶å¿
é¡»ä½ä¸ºåç¬è¯å¥ä½¿ç¨ã
5. è¿ç¨å¯ä»¥åªæ§è¡ä¸ä¸ªä»»å¡è没æ计ç®çç»æï¼èå½æ°åå¿
é¡»è¿åä¸ä¸ªè®¡ç®å¼ã
ä¾10.ä»»æè¾å
¥ä¸ä¸ªæ´æ°ï¼å°å®åæå符串è¾åºãå¦:è¾å
¥æ°34567ï¼æå°åºå符"34567"ãè¦æ±ç¨è¿ç¨çæ¹æ³å®ç°ã
PROGRAM E10(input,output);
var i,k:integer;
s:string;
PROCEDURE n_c(n:integer;var s:string);
var l:inTeger;
begin
l:=abs(n);
s:='';
repeat
s:=char((l mod 10) +ord('0'))+s;
l:=l div 10;
until l=0;
if n <0 then s:='-'+s;
end;
BEGIN
for i:=1 to 10 do
begin
writeln('input k');
readln(k);
n_c(k,s);
writeln('the string is:',s);
end;
END.
温馨提示:答案为网友推荐,仅供参考