求一VFP编程题,江湖救急,明天要交的作业,实在不太会做A,B二个正整数,若均为偶数则1,若均为奇数则置-1,否则交换两数,A和B的奇偶性分四种,A奇B奇:A奇B偶,A偶B奇,A偶B偶,判断A,若A是奇再判断B是

来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/21 20:30:30
求一VFP编程题,江湖救急,明天要交的作业,实在不太会做A,B二个正整数,若均为偶数则1,若均为奇数则置-1,否则交换两数,A和B的奇偶性分四种,A奇B奇:A奇B偶,A偶B奇,A偶B偶,判断A,若A是

求一VFP编程题,江湖救急,明天要交的作业,实在不太会做A,B二个正整数,若均为偶数则1,若均为奇数则置-1,否则交换两数,A和B的奇偶性分四种,A奇B奇:A奇B偶,A偶B奇,A偶B偶,判断A,若A是奇再判断B是
求一VFP编程题,江湖救急,明天要交的作业,实在不太会做
A,B二个正整数,若均为偶数则1,若均为奇数则置-1,否则交换两数,A和B的奇偶性分四种,A奇B奇:A奇B偶,A偶B奇,A偶B偶,判断A,若A是奇再判断B是否奇,是则置1,否则交换,若A是偶再判断B是否偶,是则消零,否则交换

求一VFP编程题,江湖救急,明天要交的作业,实在不太会做A,B二个正整数,若均为偶数则1,若均为奇数则置-1,否则交换两数,A和B的奇偶性分四种,A奇B奇:A奇B偶,A偶B奇,A偶B偶,判断A,若A是奇再判断B是
CLEAR
input "请输入A值:" to a
input "请输入B值:" to b
IF MOD(a,2)=0 AND MOD(b,2)=0 then
c=1
?c
ELSE
IF MOD(a,2)=1 AND MOD(b,2)=1 then
c=-1
?c
ELSE
tmp=b
b=a
a=tmp
?a
?b
ENDIF
ENDIF