type st20=string[20]; var vpi:^integer; //定义一个指向整型的指针变量 vpst20:^st20 ; //定义一个指向自定义类型st20的指针变量 vp:POINTER; //定义一个指向POINTER类型(系统预定义的无类型指针)的指针变量。 v1,v2,v3:integer;
v1:=10; v2:=100; v3:=1000; st:st[20]=‘hello’; vp:=nil; // nil不指向任何变量的地址 vpi:=@v1 ; // vpi指向v1,@是地址提取符 vpi:=addr(v1) ; // 同上 vp:=@st;
writeln(‘v1=’,v1); // writeln(‘v1=’,vpi^) ; // 结果同上 writeln(‘st=’,st); writeln(‘st=’,st20(vp^)); // 结果同上
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。
发布者:全栈程序员-用户IM,转载请注明出处:https://javaforall.cn/234496.html原文链接:https://javaforall.cn