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
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标准输出