?? c1.txt
字號:
{數(shù)組測試}
{結(jié)果應(yīng)為:0,1,2,3,4,5}
program sd
type i=integer;
sarray=array [0..5] of integer;
var i x;
sarray y;
integer ss;
procedure sd(integer a);
begin
write(a)
end
begin
ss:=0;
while ss<6 do
y[ss]:=ss;
x:=y[ss];
sd(x);
ss:=ss+1
endwh
end.
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -