切换到宽版
发帖 回复
返回列表
  • 6637阅读
  • 3回复

不定量数组的开辟 [复制链接]

 上一主题 下一主题
离线zhuang
OIFans复赛选手
 
只看楼主 倒序阅读 0 发表于: 2006-10-30
如果有一个变量n,我要设置能存储n个变量的数组,该怎样做.
我试过
var n:integer;
    a:array[1..n] of integer;
可是这是错误的.
我是刚学的.
...多思考,少说话...
回复
举报
分享到 淘江湖 新浪 QQ微博 QQ空间 开心 人人 豆瓣 网易微博 百度 鲜果 白社会 飞信
离线pochy
OIFans入门选手
只看该作者 1 发表于: 2006-10-30
我用的Free Pascal,不晓得lz和楼上的TP还是FP
复制代码
  1. Var
  2.   A:^Integer;
  3. Begin
  4.   Readln(N) ; //或者其它你能得到N的方法
  5. 　 Getmem( A , N * Sizeof(integer) );　//分配内存,大小为N个integer 实际上是A[0..N-1]
  6.   //其它代码,可以有像　A[1], A [ I ]这样类似于数组的写法
  7. 　 Freemem ( A );//记得使用后释放
  8. End;

Getmem和Freemem都是System单元的标准过程,可以直接使用
[ 此贴被pochy在2006-10-30 20:39重新编辑 ]
回复
举报
离线stevenjl
管理员
只看该作者 2 发表于: 2006-10-30
不推荐用不定量数组
Dream Walker...
回复
举报
离线zhuang
OIFans复赛选手
只看该作者 3 发表于: 2006-11-01
谢谢
...多思考,少说话...
回复
举报
发帖 回复
返回列表
快速回复
限100 字节
 
上一个 下一个