C 转 Object Pascal 的两个问题。 (36分)

I

iCANK

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-04

• #1

下面两个很简单的 C 程序，用 Object Pascal 怎么写啊？
1. for 循环
for (i=0;i<100;i+=3){
.......//some code
}

2. 数组赋初值（变量）
int array[] = {0,1,2,3,4,5,6,7,8,9};

应该是很简单的问题，就是想不出来。难道 Object Pascal 没有这个功能？不可能吧！

 

C

coldew

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-04

• #2

1. i:=0
while i<100 do
begin
//some code
Inc(i,3)
end;

 

K

kkyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-04

• #3

1:
I := 0;
while I < 100 do begin
...
Inc(I, 3)

end;

2:
arr: array[0..9]of Integer = (0,1,2,3,4,5,6,7,8,9);

 

影

影 子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-04

• #4

问题2：
定义为全局变量
a : array[0..9] of byte=(0,1,2,3,4,5,6,7,8,9);

 

Y

yeath

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-04

• #5

同意楼上的，收贴吧!