var
m,n,j;integer;
begin
m:=$F0; {$F0是什么意思}
n:=$8F; {$8F是什么意思}
writeLn(m and n);{这是什么函数,有什么用,}
j:=5;
if (j>0) and (j<10) then
j:=j-1;
end
m,n,j;integer;
begin
m:=$F0; {$F0是什么意思}
n:=$8F; {$8F是什么意思}
writeLn(m and n);{这是什么函数,有什么用,}
j:=5;
if (j>0) and (j<10) then
j:=j-1;
end
解决方案 »
- 请教高手delphi的编译出错问题!
- ==========GetEnvironmentVariable如何正确使用(顺祝大家十一快乐)====================
- 急需救援: 怎样用sql对加密的表建立和删除索引呀
- 请问DBGRID怎么实现这样的功能??
- 请教一下这样一个电子印章的解决方案可行吗?分不够再加,高分奖励!
- (小问题)改form中的image的大小
- 有关 delphi报表问题
- 太奇怪了,线程中创建窗体,跟踪执行没错,正常执行就出异常!!
- 怎么才能在response.content输出数据库里的备注字段的内容啊?
- 请问这里的高手:刻录光盘时如何才能加入自动运行功能(即有autorun.exe和autorun.inf)?
- 如何对多个edit控件整体赋值?
- 找DbGridEH控件的最新版本!
m,n,j;integer;
begin
m:=$F0; {$F0是16进制数,即240}
n:=$8F; {$8F是16进制数,即143}
writeLn(m and n);{往控制台写入 m and n的值,即$80(128)}
j:=5;
if (j>0) and (j<10) then
j:=j-1;
end
n:=$8F; {$8F是什么意思}
十六进制writeLn(m and n);Pascal标准输出