1
我這樣做,其工作稍微好一點,現在我得到的錯誤: 44分之45matric.pas 致命:語法錯誤),但卻爲const char發現 這是可能的,因爲我我正在使用pascal圖。多維數組帕斯卡syntac錯誤
program MatrixArray;
Uses wincrt,graph;
Var
GraphicsDriver, GraphicsMode: Smallint;
Xaxis: array[1..10] of string;
Yaxis: array[1..10] of string;
Matrix: array[1..10,1..10] of string;
x:integer;
y:integer;
{two var's are needed for initialisation}
Begin
Writeln('Loading Game Graphics...');
GraphicsDriver := Detect;
InitGraph(GraphicsDriver, GraphicsMode,'');
ClearViewPort;
宣告陣列
Xaxis[1] :='A';
Xaxis[1] :='B';
Xaxis[1] :='C';
Xaxis[1] :='D';
Xaxis[1] :='E';
Xaxis[1] :='F';
Xaxis[1] :='G';
Xaxis[1] :='H';
Xaxis[1] :='I';
Xaxis[1] :='J';
Yaxis[1] :='1';
Yaxis[1] :='2';
Yaxis[1] :='3';
Yaxis[1] :='4';
Yaxis[1] :='6';
Yaxis[1] :='7';
Yaxis[1] :='8';
Yaxis[1] :='9';
Yaxis[1] :='10';
for x := 1 to 10 do
for y := 1 to 10 do
Matrix[x,y] := Xaxis[x] + Yaxis[y];
For x := 1 to 10 do
for y := 1 to 10 do
outtextxy就像writeln(); http://pascal-programming.info/lesson8.php
OutTextXY(0,0, Matrix[x,y]' ');
End.
替換OutTextYX(0,0,矩陣[X,Y]」「); – Arran
with OutText(Matrix [x,y]);它可以工作 – Arran
你可能是指'Xaxis [2]:='B';','Xaxis [3]:='C';'等等;-) – NGLN