pascal if (n and 1)>0 then 什么意思?求解

如题所述

推荐答案 2012-07-25

and是位运算，（n and 1）就是n的2进制下个位与1取and，and的运算是：
1 and 1=1,
1 and 0=0,
0 and 1=0,
0 and 0=0 ；
显然（n and 1）>0就是1了，换句话说n的2进制下个位是1，就是说n是奇数是真，所以这句话的意思是判断n是否是奇数，跟if n mod 2=1 then意思一样

温馨提示：答案为网友推荐，仅供参考

当前网址：http://44.wendadaohang.com/zd/V33DKW6RZ.html

其他回答

第1个回答 2012-07-25

就是N非0时为真，执行then后面的内容，否则不执行

第2个回答 2012-07-25

and运算指二进制中最后一位 1:奇数;0:偶数; 即如果为奇数就......
and 比mod快

相似回答

pascal if语句中 and 和 or是什么意思啊?答：if 是判断语句用法是 if (布尔值或结果为布尔型的语句) then ```（布尔值真的情况） else···（布尔值假的情况）and 是与运算就是 1and 2 如果1和2 都是真返回值才是真有一个是假返回值就是假 or 是或运算 1 or 2 就是 1和2中只要有一个是真就返回真...

pascal语言编程十万火急答：第二种办法和第一种原理相同，但是对这六箱货是否装载进行二进制编码，结果一个0～63，这样可以用一重循环来实现，完整程序如下：{$apptype console} program temp;var a,b: integer;max,sum:real;begin max:=0;for a:=0 to 63 do begin sum:=0;if a and 1<>0 then sum:=sum+5;if ...

pascal求解,并说说各题原理。答：名字叫计数排序。。。 t:=0; for i:=0 to 1000 do if a[i]<>0 then inc(t); writeln(t); for i:=0 to 1000 do if a[i]<>0 then write(i,' ');end.//P4//题目要求的是第n+1个斐波那契数f[n+1]：f[1]=1,f[2]=1,f[n]=f[n-1]+f[n-2]//...

pascal循环求解答：for n:=1 to 100 do if ((1+(n-1) div 8=2+(n-1-(n-1) div 8-2) div 8)) then {第一二个人得相同多} if ((n-1) mod 8=0) then { 总数去1能被均分8份} if (n mod (1+(n-1) div 8)=0) then {总数能被均分给每个人} writeln(n,' apples,',n div (1+(...

大家正在搜

if and only if if and when ifgt能组成什么单词 ifgt组成什么英语单词 Shell if if与and函数怎么用 if函数and多个条件怎么用 if里面的and函数怎么使用 if和or and函数一起使用