type code:array[1..4]of integer;//èªå®ä¹ä¸ä¸ªä¸ç»´æ°ç»ç±»åVar a:array[1..4]of code;//ä¸ä¸ªä¸ç»´çcodeï¼ä¹å°±æäºäºç»´æ°ç»h:code;//交æ¢ç¨ä¸´æ¶åéi,j:longint;Begin For i:=1 to 4 do For j:=1 to 4 do read(a[i,j]); h:=a[2];a[2]:=a[3];a[3]:=h;//对第2ã3è¡è¿è¡äº¤æ¢ï¼å¿
é¡»æ¯åç±»åçåéæè½è¿è¡äº¤æ¢ï¼è¿éhãa[2]ãa[3]é½æ¯èªå®ä¹çcodeç±»åï¼ For i:=1 to 4 do Begin For j:=1 to 4 do write(a[i,j],' '); writeln; End;End.
温馨提示:答案为网友推荐,仅供参考